Simplification of discriminant from scale-rotated-ellipse

Time bar (total: 2.5min)

start0.0ms (0%)

Memory
0.2MiB live, 0.2MiB allocated

analyze580.0ms (0.4%)

Memory
-3.5MiB live, 1 840.9MiB allocated
Algorithm
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
25%24.9%74.8%0.2%0%0%0%6
25%24.9%74.8%0.2%0%0%0%7
25%24.9%74.8%0.2%0%0%0%8
25%24.9%74.8%0.2%0%0%0%9
37.5%37.4%62.3%0.2%0%0%0%10
56.3%56.1%43.6%0.2%0%0%0%11
56.3%56.1%43.6%0.2%0%0%0%12
Compiler

Compiled 111 to 41 computations (63.1% saved)

sample7.9s (5.3%)

Memory
54.3MiB live, 13 093.6MiB allocated
Samples
4.7s4 215×1valid
1.3s950×2valid
854.0ms3 091×0valid
48.0ms107×1exit
Precisions
Click to see histograms. Total time spent on operations: 6.5s
ival-sin: 1.5s (23.6% of total)
ival-cos: 1.3s (20% of total)
ival-mult: 1.2s (17.9% of total)
ival-div: 984.0ms (15.2% of total)
ival-pow2: 857.0ms (13.3% of total)
adjust: 272.0ms (4.2% of total)
ival-sub: 180.0ms (2.8% of total)
ival-add: 117.0ms (1.8% of total)
ival-pi: 52.0ms (0.8% of total)
exact: 13.0ms (0.2% of total)
ival-true: 8.0ms (0.1% of total)
ival-assert: 4.0ms (0.1% of total)
Bogosity

explain1.1s (0.7%)

Memory
16.7MiB live, 2 556.9MiB allocated
FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1480-0-(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
1060-0-(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
1060-0-(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
340-0-(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
300-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))))
300-1(-1.0234283035227176e-178 5.706578249746383e-158 -1.1185970423228698e-154 3.5384259677269447e-162 1.431090025125263e+140)(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)
280-3(4.140161338586714e-34 -8.295588991247076e-297 8.96582512308757e-256 -5.612261380902282e-19 -4.107884512212652e+188)(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)
240-1(7.461144765836699e-156 -1.2518711947800573e-231 2.306578796978378e-98 3.2291393015351577e-229 -1.915898794397405e-294)(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)
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)
180-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)
170-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)
170-0-(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
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 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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-(*.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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #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-(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-#s(literal 180 binary64)
00-0-angle
00-0-#s(literal 2 binary64)
00-0-(*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
00-0-b
00-0-a
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-(PI.f64)
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-(/.f64 angle #s(literal 180 binary64))
00-0-(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
00-0-#s(literal 4 binary64)
00-0-y-scale
Explanations
Click to see full explanations table
OperatorSubexpressionExplanationCount
-.f64(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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-rescue1260
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow148
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow208
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)overflow184
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow148
(pow.f64 b #s(literal 2 binary64))overflow134
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale))overflow126
(pow.f64 a #s(literal 2 binary64))overflow108
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow208
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow156
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow86
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow96
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow67
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))overflow133
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow37
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow85
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow80
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow96
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow54
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow86
cos.f64(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1060
sin.f64(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))sensitivity1060
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.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*o290
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n240
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow67
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow85
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
-.f64(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))cancellation220
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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))))overflow74
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow104
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow104
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow74
(pow.f64 b #s(literal 2 binary64))overflow67
(pow.f64 a #s(literal 2 binary64))overflow54
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n180
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow54
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow37
-.f64(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))nan-rescue170
(pow.f64 b #s(literal 2 binary64))overflow67
(pow.f64 a #s(literal 2 binary64))overflow54
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n160
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow54
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow37
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow96
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n150
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow67
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow85
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow80
/.f64(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/n120
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow74
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow104
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))overflow74
(pow.f64 b #s(literal 2 binary64))overflow67
(pow.f64 a #s(literal 2 binary64))overflow54
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow104
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)overflow78
*.f64(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))n*o110
*.f64(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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*o100
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)underflow46
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow58
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow22
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow108
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow30
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))underflow46
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow32
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)overflow96
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow54
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow37
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)overflow96
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow83
/.f64(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/n90
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow25
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow11
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow25
(pow.f64 b #s(literal 2 binary64))underflow57
(pow.f64 a #s(literal 2 binary64))underflow66
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow11
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale)underflow36
*.f64(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))n*u90
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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/n50
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow21
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow66
(pow.f64 (*.f64 b (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))))underflow36
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
/.f64(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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))))underflow32
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow58
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow22
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow108
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
*.f64(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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*u30
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)overflow86
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))overflow86
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow67
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))overflow85
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))overflow25
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)overflow80
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)underflow38
(pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow66
(pow.f64 (*.f64 b (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))))underflow36
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow27
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow21
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/n20
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow32
(pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow58
(+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow22
(pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))underflow108
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale)underflow30
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
/.f64(/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (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))))underflow25
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))underflow11
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))underflow11
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))underflow25
(pow.f64 b #s(literal 2 binary64))underflow57
(pow.f64 a #s(literal 2 binary64))underflow66
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
/.f64(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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))underflow66
(pow.f64 (*.f64 b (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))))underflow36
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale)underflow27
(+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)))underflow21
*.f64(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))o*u10
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))overflow104
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))overflow104
(pow.f64 b #s(literal 2 binary64))overflow67
(pow.f64 a #s(literal 2 binary64))overflow54
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))underflow3
Confusion
Predicted +Predicted -
+1912
-3033
Precision
0.8642533936651584
Recall
0.9896373056994818
Confusion?
Predicted +Predicted MaybePredicted -
+19102
-30033
Precision?
0.8642533936651584
Recall?
0.9896373056994818
Freqs
test
numberfreq
035
160
259
345
436
513
67
71
Total Confusion?
Predicted +Predicted MaybePredicted -
+100
-000
Precision?
1.0
Recall?
1.0
Samples
326.0ms282×1valid
71.0ms58×2valid
54.0ms172×0valid
Compiler

Compiled 1 310 to 121 computations (90.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 391.0ms
ival-cos: 113.0ms (28.9% of total)
ival-sin: 74.0ms (18.9% of total)
ival-mult: 63.0ms (16.1% of total)
ival-pow2: 53.0ms (13.5% of total)
ival-div: 44.0ms (11.2% of total)
adjust: 22.0ms (5.6% of total)
ival-sub: 9.0ms (2.3% of total)
ival-add: 7.0ms (1.8% of total)
ival-pi: 3.0ms (0.8% of total)
ival-true: 1.0ms (0.3% of total)
exact: 1.0ms (0.3% of total)
ival-assert: 0.0ms (0% of total)

preprocess205.0ms (0.1%)

Memory
9.8MiB live, 450.8MiB allocated
Algorithm
egg-herbie
Rules
8 778×lower-*.f32
8 756×lower-*.f64
2 492×lower-fma.f64
2 492×lower-fma.f32
2 010×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03362225
19252185
236572140
039109
070109
1119109
2322107
31396107
46336107
08835106
Stop Event
iter limit
node limit
iter limit
node limit
Calls
Call 1
Inputs
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
Outputs
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 b a))) (*.f64 (+.f64 b a) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
Symmetry

(abs y-scale)

(abs x-scale)

(abs angle)

(abs b)

(abs a)

Compiler

Compiled 114 to 39 computations (65.8% saved)

eval0.0ms (0%)

Memory
0.5MiB live, 0.5MiB allocated
Compiler

Compiled 5 to 5 computations (0% saved)

prune1.0ms (0%)

Memory
3.3MiB live, 3.3MiB allocated
Alt Table
Click to see full alt table
StatusAccuracyProgram
25.3%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
Compiler

Compiled 114 to 39 computations (65.8% saved)

simplify162.0ms (0.1%)

Memory
-2.0MiB live, 354.1MiB allocated
Algorithm
egg-herbie
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
cost-diff384
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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-diff704
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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))
Rules
8 778×lower-*.f32
8 756×lower-*.f64
2 492×lower-fma.f64
2 492×lower-fma.f32
2 010×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
039596
070596
1119596
2322592
31396592
46336592
08835591
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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))))
#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))
b
(pow.f64 a #s(literal 2 binary64))
a
(sin.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
#s(literal 180 binary64)
(PI.f64)
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
x-scale
y-scale
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (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 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
#s(literal 4 binary64)
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(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))))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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))))
(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))))
Outputs
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(fma.f64 (*.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -4 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 b a))) (*.f64 (+.f64 b a) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (*.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 b a))) (*.f64 (+.f64 b a) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.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 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.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 (PI.f64)) #s(literal 180 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #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 #s(literal 2 binary64) (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (+.f64 b a) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 b a)))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.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 (+.f64 b a) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (-.f64 b a))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.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)
b
(pow.f64 a #s(literal 2 binary64))
(*.f64 a a)
a
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))
(/.f64 angle #s(literal 180 binary64))
angle
#s(literal 180 binary64)
(PI.f64)
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
x-scale
y-scale
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (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 4 binary64) (*.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(*.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale)))
#s(literal 4 binary64)
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
(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 (*.f64 angle (PI.f64)) #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 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))

localize280.0ms (0.2%)

Memory
12.4MiB live, 679.2MiB allocated
Localize:

Found 4 expressions of interest:

NewMetricScoreProgram
accuracy7.995763884999936
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
accuracy23.134059329868936
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy23.557604291147854
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy36.484224016339766
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
Samples
136.0ms141×1valid
46.0ms29×2valid
30.0ms86×0valid
Compiler

Compiled 598 to 41 computations (93.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 180.0ms
ival-mult: 45.0ms (25% of total)
ival-sin: 38.0ms (21.1% of total)
ival-cos: 31.0ms (17.2% of total)
ival-pow2: 21.0ms (11.7% of total)
ival-div: 19.0ms (10.6% of total)
ival-sub: 12.0ms (6.7% of total)
adjust: 8.0ms (4.4% of total)
ival-add: 3.0ms (1.7% of total)
ival-pi: 2.0ms (1.1% of total)
exact: 1.0ms (0.6% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series155.0ms (0.1%)

Memory
8.9MiB live, 373.2MiB allocated
Counts
8 → 288
Calls
Call 1
Inputs
#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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (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>) () ())
#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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>) () ())
Outputs
#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 (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 (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 (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 (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 (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 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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)))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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))))))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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)))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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))))))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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)))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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))))))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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)))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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))))))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -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))))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 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))))))) (* 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)))))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 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/3149280000 (/ (* (pow (PI) 4) (* (+ (* 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/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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)))))))))))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 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 (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 (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 (* 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 (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 (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 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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>) () ())) ())
Calls

72 calls:

TimeVariablePointExpression
23.0ms
x-scale
@0
(* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))
15.0ms
b
@0
(- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)))
8.0ms
angle
@0
(- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)))
7.0ms
angle
@0
(* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale))
6.0ms
a
@0
(- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)))

simplify333.0ms (0.2%)

Memory
-0.8MiB live, 786.5MiB allocated
Algorithm
egg-herbie
Rules
11 112×lower-fma.f64
11 112×lower-fma.f32
9 850×lower-*.f64
9 850×lower-*.f32
2 948×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
045216440
1176515416
0852315091
Stop Event
iter limit
node limit
Counts
288 → 288
Calls
Call 1
Inputs
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (* (pow angle 2) (+ (* -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 angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 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))))))) (* 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 angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 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/3149280000 (/ (* (pow (PI) 4) (* (+ (* 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/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))))))))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-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)))))))
(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))))
(* 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))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 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))))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
Outputs
(pow b 2)
(*.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)
(pow b 2)
(*.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)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow a 2)
(*.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)
(pow a 2)
(*.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)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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)))))
(fma.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b (*.f64 b (*.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 x-scale (*.f64 x-scale (*.f64 y-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 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (*.f64 b (fma.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 b (*.f64 b (fma.f64 (*.f64 b b) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (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 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (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 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (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 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (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 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (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 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (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 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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)))))
(fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b (*.f64 b (*.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 x-scale (*.f64 x-scale (*.f64 y-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 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal 4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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))))
(/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.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 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.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 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.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 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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))))
(/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.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 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.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 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.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 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 angle (*.f64 angle (*.f64 (PI.f64) (PI.f64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -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)))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64)) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 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))))))) (* 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))))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/32400 binary64)) (fma.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/102036672000000 binary64) (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 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/3149280000 (/ (* (pow (PI) 4) (* (+ (* 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/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/32400 binary64)) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (pow.f64 (PI.f64) #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/32400 binary64)) (fma.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/102036672000000 binary64) (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64))) (*.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 a a))) (*.f64 b (*.f64 b (*.f64 x-scale y-scale)))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 b b))) (*.f64 (*.f64 (*.f64 a a) x-scale) y-scale)) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(*.f64 angle (fma.f64 (PI.f64) (*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale)) #s(literal 1/90 binary64)) (*.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/4374000 binary64)))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(*.f64 angle (fma.f64 (PI.f64) (*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale)) #s(literal 1/90 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/4374000 binary64))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(*.f64 angle (fma.f64 (PI.f64) (*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale)) #s(literal 1/90 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))) #s(literal -29/30855889612800000000 binary64) (*.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (pow.f64 (PI.f64) #s(literal 7 binary64))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/4374000 binary64))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.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)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.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)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64) (fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (-.f64 (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 1/32400 binary64)) (fma.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 #s(literal 1/102036672000000 binary64) (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))) (fma.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (PI.f64) (PI.f64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 b (*.f64 b (/.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)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
1
#s(literal 1 binary64)
(+ 1 (* -1/64800 (* (pow angle 2) (pow (PI) 2))))
(fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) #s(literal 1 binary64))
(+ 1 (* (pow angle 2) (+ (* -1/64800 (pow (PI) 2)) (* 1/25194240000 (* (pow angle 2) (pow (PI) 4))))))
(fma.f64 (*.f64 angle angle) (fma.f64 angle (*.f64 angle (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64))) (*.f64 (PI.f64) (*.f64 (PI.f64) #s(literal -1/64800 binary64)))) #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 (*.f64 angle angle) (fma.f64 (PI.f64) (*.f64 (PI.f64) #s(literal -1/64800 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/24488801280000000 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64))))) #s(literal 1 binary64))
(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))))
(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))))
(* 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 (*.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64)) angle) angle (*.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 (*.f64 angle angle) (fma.f64 angle (*.f64 angle (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* 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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 7 binary64)) #s(literal -1/30855889612800000000 binary64)) (*.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (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))))
(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))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* 4 (* (pow a 2) (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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 a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (fma.f64 a (*.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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 (pow.f64 b #s(literal 4 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 x-scale (*.f64 y-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 a 2) (+ (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 a a) (*.f64 #s(literal 4 binary64) (fma.f64 a (*.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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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 (pow.f64 b #s(literal 4 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 x-scale (*.f64 y-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))))
(/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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)))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow a 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))
(*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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)))))
(* (pow a 4) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 a #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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)))))
(* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(+ (* 4 (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 angle (*.f64 angle (fma.f64 b (*.f64 b (/.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)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 (*.f64 (*.f64 angle angle) #s(literal 4 binary64)) (fma.f64 (*.f64 angle angle) (fma.f64 b (*.f64 b (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 b (*.f64 b (/.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)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+ (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.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)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64))) (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) a) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 b (*.f64 b (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 a (*.f64 a (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64)) (*.f64 b (*.f64 b (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (/.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)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-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))))
(/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(+ (* 4 (* (pow b 2) (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 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)))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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 b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.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) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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 b 2) (+ (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 (*.f64 b b) #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.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) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-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))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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)))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) #s(literal 4 binary64)) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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)))))
(* (pow b 4) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (+.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (pow.f64 b #s(literal 4 binary64))) #s(literal 1 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (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)))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 b (*.f64 b (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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)))) (fma.f64 b (*.f64 b (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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))

rewrite294.0ms (0.2%)

Memory
7.0MiB live, 727.5MiB allocated
Rules
4 522×lower-*.f32
4 500×lower-*.f64
3 962×lower-/.f32
3 948×lower-/.f64
3 758×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
039262
070210
1266210
22077185
08541184
Stop Event
iter limit
node limit
iter limit
Counts
8 → 532
Calls
Call 1
Inputs
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
Outputs
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)) #s(literal 1 binary64)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 b))
(*.f64 b b)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)) #s(literal 1 binary64)))
(pow.f64 a #s(literal 2 binary64))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 a))
(*.f64 a a)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) y-scale)))
(/.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) (*.f64 (*.f64 x-scale y-scale) y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) (*.f64 (neg.f64 y-scale) y-scale))
(/.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (neg.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64))) (neg.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) y-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))) (neg.f64 (*.f64 (neg.f64 y-scale) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))) (neg.f64 (neg.f64 (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 y-scale)))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -2 binary64))
(pow.f64 (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) #s(literal 2 binary64))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 2 binary64)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) x-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 2 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) y-scale))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale))
(*.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)))
(*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)) y-scale))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(exp.f64 (*.f64 (log.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 x-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (neg.f64 x-scale))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 (*.f64 x-scale y-scale))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (neg.f64 (neg.f64 (neg.f64 y-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)) y-scale)
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (*.f64 y-scale (neg.f64 x-scale))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) x-scale)
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal 1 binary64))) (neg.f64 (*.f64 (neg.f64 x-scale) y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) y-scale))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (/.f64 #s(literal 1 binary64) y-scale))) (neg.f64 (neg.f64 x-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale)) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64))
(pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (pow.f64 (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 1 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 2 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale))
(*.f64 (/.f64 #s(literal 2 binary64) y-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale))
(*.f64 (/.f64 #s(literal 2 binary64) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale))
(*.f64 (/.f64 #s(literal 2 binary64) x-scale) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) y-scale) (/.f64 (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale))
(*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale) (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale))
(*.f64 (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) y-scale) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)))
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (neg.f64 x-scale)))
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (neg.f64 x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal -1 binary64)) (/.f64 (neg.f64 (/.f64 #s(literal 1 binary64) x-scale)) y-scale))
(*.f64 (/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #s(literal -1 binary64)) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale))
(+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(-.f64 (/.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 y-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) (*.f64 y-scale (*.f64 y-scale y-scale))))
(-.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale y-scale)) (/.f64 (*.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) (*.f64 y-scale y-scale)))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (pow.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (exp.f64 (log.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) x-scale) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) y-scale) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 #s(literal -4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal -1 binary64)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal -4 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 #s(literal -4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal -4 binary64) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -1 binary64)) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 2 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 #s(literal 1 binary64) x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) y-scale) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) y-scale) (/.f64 (pow.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) y-scale) (/.f64 (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (/.f64 #s(literal 1 binary64) x-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 y-scale (neg.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal 4 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) y-scale) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) y-scale) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -1 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal -4 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (neg.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale))) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 4 binary64) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) #s(literal -1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) y-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))))
(/.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) y-scale) y-scale)
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (*.f64 y-scale (*.f64 y-scale y-scale)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (*.f64 x-scale y-scale))
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (neg.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (neg.f64 x-scale)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (neg.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) y-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))) (neg.f64 (*.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale) (*.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(/.f64 (fma.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64))) (fma.f64 #s(literal 16 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))))
(pow.f64 (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #s(literal 1 binary64)))
(cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(pow.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #s(literal 1 binary64)))
(sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(pow.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #s(literal 1 binary64))
(/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) y-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale))) (*.f64 x-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 (*.f64 y-scale y-scale) x-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) (*.f64 (neg.f64 y-scale) x-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) x-scale)
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))) (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) #s(literal 1 binary64))) (neg.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal 1 binary64))) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 (*.f64 x-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 (*.f64 y-scale y-scale) x-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 (*.f64 (neg.f64 y-scale) x-scale)))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)))) (neg.f64 (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)))) (neg.f64 x-scale))
(/.f64 (neg.f64 (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 (*.f64 y-scale (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))))
(/.f64 (neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (neg.f64 (neg.f64 y-scale)))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale))) #s(literal -1 binary64))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal 4 binary64))
(*.f64 (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) #s(literal 4 binary64)) (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 #s(literal 4 binary64) y-scale) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) y-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale) (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) x-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 #s(literal 4 binary64) y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) x-scale) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 4 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 #s(literal 4 binary64) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale #s(literal 1 binary64))) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale))
(*.f64 (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (/.f64 y-scale (neg.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (neg.f64 y-scale)) #s(literal -1 binary64)) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) y-scale))

eval187.0ms (0.1%)

Memory
18.1MiB live, 573.1MiB allocated
Compiler

Compiled 125 826 to 2 683 computations (97.9% saved)

prune259.0ms (0.2%)

Memory
-19.0MiB live, 748.7MiB allocated
Pruning

31 alts after pruning (31 fresh and 0 done)

PrunedKeptTotal
New1 075311 106
Fresh000
Picked101
Done000
Total1 076311 107
Accuracy
68.9%
Counts
1 107 → 31
Alt Table
Click to see full alt table
StatusAccuracyProgram
21.0%
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
24.7%
(fma.f64 (/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) y-scale) (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
25.5%
(fma.f64 (/.f64 #s(literal -1 binary64) y-scale) (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
25.6%
(/.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) y-scale) y-scale)
22.1%
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
29.7%
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale))) (*.f64 x-scale y-scale))
25.0%
(-.f64 (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
24.7%
(-.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
25.5%
(-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) x-scale) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
25.8%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
22.3%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale)) x-scale))
25.4%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 x-scale y-scale)))))
26.9%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) y-scale) x-scale) (/.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) x-scale) y-scale)))
27.6%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
24.9%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
18.8%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #s(approx (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
18.7%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale)) #s(approx (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
25.0%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) (fma.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 #s(literal -1/64800 binary64) (*.f64 angle angle)) #s(literal 1 binary64)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
31.0%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
25.9%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 1 binary64) x-scale) (/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
22.9%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (exp.f64 (*.f64 (log.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
26.3%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
35.3%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 (*.f64 a a) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -2 binary64)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
37.2%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) #s(approx (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (/.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 x-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
25.2%
(-.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
23.8%
(-.f64 (*.f64 (/.f64 (sin.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (cos.f64 (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) x-scale)) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
23.5%
(-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (/.f64 (*.f64 (*.f64 #s(literal 4 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)))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
23.7%
(-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
56.1%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
43.2%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))))
42.1%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))))
Compiler

Compiled 6 358 to 2 680 computations (57.8% saved)

simplify191.0ms (0.1%)

Memory
17.2MiB live, 454.9MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff384
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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-diff768
(/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
cost-diff6144
(pow.f64 a #s(literal 2 binary64))
cost-diff6144
(pow.f64 b #s(literal 2 binary64))
cost-diff0
#s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
cost-diff128
(-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
cost-diff0
(*.f64 b b)
cost-diff0
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))))
cost-diff320
(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))
cost-diff128
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
cost-diff128
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
cost-diff128
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
cost-diff320
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
cost-diff0
(*.f64 #s(literal -4 binary64) (*.f64 b b))
cost-diff0
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
cost-diff0
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
Rules
7 916×lower-*.f32
7 828×lower-*.f64
2 812×lower-fma.f32
2 806×lower-fma.f64
2 800×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01452854
02502846
14822714
215422699
377372699
080472636
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(*.f64 a a)
a
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
#s(literal 2 binary64)
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle #s(literal 1/180 binary64))
angle
#s(literal 1/180 binary64)
(PI.f64)
x-scale
(*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a a)
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
#s(literal 4 binary64)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 x-scale x-scale)
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(*.f64 b b)
b
(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 a a)
a
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(cos.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)
#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 (*.f64 x-scale (*.f64 y-scale y-scale))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(literal -8 binary64)
(*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(*.f64 x-scale x-scale)
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))
(/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))
#s(literal 4 binary64)
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))
#s(literal -4 binary64)
(-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
#s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
#s(literal 4 binary64)
(/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(pow.f64 b #s(literal 4 binary64))
b
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(cos.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)
#s(literal 2 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (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 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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))))
a
(sin.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))
#s(literal 180 binary64)
(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))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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))))
(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))))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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))))
#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))
b
(pow.f64 a #s(literal 2 binary64))
a
(sin.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
#s(literal 180 binary64)
(PI.f64)
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
x-scale
y-scale
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle #s(literal 1/180 binary64))
#s(literal 1/180 binary64)
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a a)
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64))
(/.f64 #s(literal 1 binary64) x-scale)
#s(literal 1 binary64)
#s(literal 4 binary64)
Outputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 b (*.f64 b (*.f64 a (*.f64 a #s(literal -4 binary64)))))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
#s(literal -4 binary64)
(*.f64 b b)
b
(*.f64 a a)
a
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)) (pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64))
(pow.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale)) #s(literal 2 binary64))
(/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale)
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) x-scale))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
b
a
(-.f64 b a)
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))
#s(literal 2 binary64)
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 angle #s(literal 1/180 binary64))
angle
#s(literal 1/180 binary64)
(PI.f64)
x-scale
(*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #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 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))
(/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))
(*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale)))
(*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
#s(literal 4 binary64)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 x-scale x-scale)
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (*.f64 a (fma.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (/.f64 a (*.f64 x-scale x-scale)) (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 #s(literal -8 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(*.f64 (*.f64 b b) (*.f64 a (fma.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (/.f64 a (*.f64 x-scale x-scale)) (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 #s(literal -8 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))))))
(*.f64 b b)
b
(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))
(*.f64 a (fma.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (/.f64 a (*.f64 x-scale x-scale)) (*.f64 a (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 #s(literal -8 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))))))
(*.f64 a a)
a
(*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 #s(literal -8 binary64) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
#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 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(literal -8 binary64)
(*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))
(*.f64 (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 a #s(literal -4 binary64))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 a (*.f64 a (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(*.f64 x-scale x-scale)
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))
(+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))
(/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))
#s(literal 4 binary64)
(/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))
(/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))
#s(literal -4 binary64)
(-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
(fma.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal 4 binary64)))))
#s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
#s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal 4 binary64))))
(*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))) #s(literal 4 binary64)))
#s(literal 4 binary64)
(/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))) (pow.f64 b #s(literal 4 binary64))))
(*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 b #s(literal 4 binary64)))
(pow.f64 b #s(literal 4 binary64))
b
(pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
#s(literal 1/180 binary64)
(*.f64 angle (PI.f64))
angle
(PI.f64)
#s(literal 2 binary64)
(pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
(*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale))
(/.f64 (*.f64 (*.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (+.f64 (pow.f64 (*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))
(*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale))
(*.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale)))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 a (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
a
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))
(/.f64 angle #s(literal 180 binary64))
#s(literal 180 binary64)
(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 (*.f64 angle (PI.f64)) #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 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.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 (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #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 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 a (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
(pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))) #s(literal 2 binary64))
(*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))))
(*.f64 b (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
(fma.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) x-scale))) (/.f64 (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))))) (*.f64 y-scale (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -4 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (PI.f64)) #s(literal 180 binary64))) (*.f64 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 (*.f64 (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))))))) (*.f64 x-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 (PI.f64)) #s(literal 180 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))))))) (*.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 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 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 (cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #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 #s(literal 2 binary64) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) (sin.f64 (/.f64 (*.f64 angle (PI.f64)) #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 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))
#s(literal 2 binary64)
(-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))
(*.f64 (+.f64 b a) (-.f64 b a))
(pow.f64 b #s(literal 2 binary64))
(*.f64 b b)
b
(pow.f64 a #s(literal 2 binary64))
(*.f64 a a)
a
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
(*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64))
(/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64))
(/.f64 angle #s(literal 180 binary64))
angle
#s(literal 180 binary64)
(PI.f64)
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (/.f64 (*.f64 angle (PI.f64)) #s(literal 180 binary64)))
x-scale
y-scale
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale))
(/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 angle #s(literal 1/180 binary64))
#s(literal 1/180 binary64)
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(*.f64 a a)
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)
(/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64))
(/.f64 #s(literal 4 binary64) x-scale)
(/.f64 #s(literal 1 binary64) x-scale)
#s(literal 1 binary64)
#s(literal 4 binary64)

localize978.0ms (0.7%)

Memory
-17.0MiB live, 2 662.7MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy22.092735704004262
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy22.436309072471605
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy22.50963864514905
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy34.734968188794994
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
accuracy22.092735704004262
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy22.50963864514905
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy22.50963864514905
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy34.734968188794994
(-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
accuracy13.980132522862501
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))
accuracy14.271473736319107
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
accuracy22.092735704004262
(sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy22.50963864514905
(cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))
accuracy15.732177184993455
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
accuracy22.421452421201547
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy22.436309072471605
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy35.872008120948216
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
accuracy2.1900371247045967
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
accuracy7.637510454870392
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy10.868768036983472
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy14.678227396637899
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
Samples
384.0ms170×1valid
257.0ms72×2valid
21.0ms5exit
6.0ms1exit
5.0ms0valid
Compiler

Compiled 2 725 to 116 computations (95.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 542.0ms
ival-mult: 133.0ms (24.6% of total)
ival-cos: 96.0ms (17.7% of total)
ival-sin: 88.0ms (16.2% of total)
ival-div: 68.0ms (12.6% of total)
adjust: 49.0ms (9% of total)
ival-pow2: 40.0ms (7.4% of total)
ival-add: 17.0ms (3.1% of total)
ival-pow: 16.0ms (3% of total)
ival-sub: 16.0ms (3% of total)
const: 15.0ms (2.8% of total)
ival-pi: 2.0ms (0.4% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series311.0ms (0.2%)

Memory
5.6MiB live, 837.5MiB allocated
Counts
31 → 1 020
Calls
Call 1
Inputs
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())
#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())
#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())
#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (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 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<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 (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (patch (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor -inf angle) (#s(alt (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) (patch (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2)) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* b (+ (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* b (+ (* b (- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2)))))) (taylor inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2)))))) (taylor inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (+ (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* a (+ (* a (- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2)))) (taylor 0 a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2)))))) (taylor inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2)))))) (taylor inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 2))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 angle) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 0 x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 0 x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 0 x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 0 x-scale) (#s(alt (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) (patch (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)))) #<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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))))) (patch (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor 0 a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor 0 a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor 0 a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor 0 a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor inf a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor inf a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor inf a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor inf a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))) (taylor -inf a) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2))))))))) (taylor 0 angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2))) (* (pow angle 2) (+ (* -8 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/51018336000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 2))))))) (pow x-scale 2)))))))))))) (taylor 0 angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))) (taylor inf angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))) (taylor inf angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))) (taylor inf angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))) (taylor inf angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))) (taylor -inf angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))) (taylor -inf angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))) (taylor -inf angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))) (taylor -inf angle) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) (patch (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor inf b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor inf a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (* (pow b 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2)))))) (* (pow b 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/51018336000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 2))))))) (pow x-scale 2)))))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2))))))) (* (pow b 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor 0 angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor inf angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor inf angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor inf angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor inf angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))) (taylor -inf angle) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) (patch (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor 0 b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor inf b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (pow b 2) (taylor -inf b) (#s(alt (*.f64 b b) (patch (*.f64 b b) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 0 a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor -inf a) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow a 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (pow b 2) (pow x-scale 2)) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 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))))))) (/ (pow b 2) (pow x-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 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 b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 -inf angle) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 0 b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2)) (taylor -inf b) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) #<representation binary64>) () ())) ())
#s(alt (* (pow b 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 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 -inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 -inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 -inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 -inf x-scale) (#s(alt (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale) (patch (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-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 (/ (* (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 (/ (* (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 (/ (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 (/ (+ (* (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 (/ (+ (* (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 (/ (* (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 (/ (* (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 (/ (* (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 (/ (+ (* (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 (/ (+ (* (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 (/ (+ (* (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 (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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) (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 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 (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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))))) (taylor 0 b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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)))))) (taylor inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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))))))) (taylor inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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))))))) (taylor inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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)))))) (taylor -inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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))))))) (taylor -inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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))))))) (taylor -inf b) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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))))) (taylor 0 a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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)))))) (taylor inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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))))))) (taylor inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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))))))) (taylor inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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)))))) (taylor -inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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))))))) (taylor -inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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))))))) (taylor -inf a) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -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))))))))) (taylor 0 angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 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))))))) (* 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)))))))))) (taylor 0 angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 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/3149280000 (/ (* (pow (PI) 4) (* (+ (* 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/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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)))))))))))) (taylor 0 angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf angle) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<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 (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 (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 (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 (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 (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 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor 0 b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale)))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale))))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale))))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor -inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale)))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale))))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale))))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale)))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* x-scale y-scale)))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale))))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale))))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale))))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale))))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<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 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (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 (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 (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 (* 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 (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 (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 (/ (pow a 2) (pow x-scale 2)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf a) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16200 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow a 2) (* (pow angle 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2))))))) (pow x-scale 2)))) (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/51018336000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 2)))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2)))))) (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf angle) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (patch (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 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 (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 (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 (- (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<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 (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 (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>) () ())) ())
Calls

255 calls:

TimeVariablePointExpression
25.0ms
angle
@inf
(- (pow (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) x-scale) 2) (* (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (/ (* 4 (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) (* x-scale x-scale))))
7.0ms
angle
@-inf
(- (pow (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) x-scale) 2) (* (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (/ (* 4 (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) (* x-scale x-scale))))
6.0ms
a
@0
(+ (* (* a a) (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale (* x-scale (* y-scale y-scale))))) -8)) (* (* (/ (* a a) (* x-scale x-scale)) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* y-scale y-scale)))) -4))
5.0ms
x-scale
@0
(- (pow (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) x-scale) 2) (* (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (/ (* 4 (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) (* x-scale x-scale))))
5.0ms
b
@0
(* (* b b) (+ (* (* a a) (* (* (pow (cos (* 1/180 (* angle (PI)))) 2) (/ (pow (sin (* 1/180 (* angle (PI)))) 2) (* x-scale (* x-scale (* y-scale y-scale))))) -8)) (* (* (/ (* a a) (* x-scale x-scale)) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (* y-scale y-scale)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (* y-scale y-scale)))) -4)))

simplify498.0ms (0.3%)

Memory
23.3MiB live, 1 214.1MiB allocated
Algorithm
egg-herbie
Rules
7 450×lower-*.f64
7 450×lower-*.f32
6 204×lower-fma.f64
6 204×lower-fma.f32
5 232×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0117155164
1434753430
0808651936
Stop Event
iter limit
node limit
Counts
1 020 → 1 020
Calls
Call 1
Inputs
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(* 1/90 (* angle (PI)))
(- (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2)) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (* b (+ (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (* b (+ (* b (- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))))))
(* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(- (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (* a (+ (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(- (+ (* a (+ (* a (- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))))))
(* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 2))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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/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/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))))))
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)))))))
(+ 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))))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2)))))))))
(+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2))) (* (pow angle 2) (+ (* -8 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/51018336000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 2))))))) (pow x-scale 2))))))))))))
(+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (* (pow b 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2)))))) (* (pow b 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/51018336000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 2))))))) (pow x-scale 2)))))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2))))))) (* (pow b 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 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)))
(+ (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (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)))
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(* (pow a 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 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 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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(* (pow a 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 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 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 angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 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))))))) (/ (pow b 2) (pow x-scale 2)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 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 b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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 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 a 2) (pow (sin (* 1/180 (* angle (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)))
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(* (pow b 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 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 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(* (pow b 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 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 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 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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (* (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)))
(/ (* (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))))
(/ (* (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))))
(/ (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)))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (* (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)))
(/ (* (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))))
(/ (* (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))))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 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))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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)))))
(+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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 b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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)))))
(+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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 a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (* (pow angle 2) (+ (* -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 angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 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))))))) (* 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 angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 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/3149280000 (/ (* (pow (PI) 4) (* (+ (* 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/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))))))))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))
(+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale)))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* x-scale y-scale)))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 y-scale))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 y-scale))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
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)))))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(* 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))))))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
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)))))))
(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))))
(* 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))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 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 x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (pow a 2) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(+ (* -1/16200 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow a 2) (* (pow angle 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2))))))) (pow x-scale 2)))) (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/51018336000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 2)))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2)))))) (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-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)))))))
(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))))
(- (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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 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)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(- (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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 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)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(* 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))))))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
(sin (* 1/180 (* angle (PI))))
Outputs
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.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)))) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(- (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale))))
(- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2)) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale)))))
(- (+ (* b (+ (* b (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 b (fma.f64 b (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale)))))
(- (+ (* b (+ (* b (- (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 b (fma.f64 b (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 b b))))))
(* (pow b 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 b (*.f64 b b)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 b b))))))
(* (pow b 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) b)) b)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (neg.f64 b))) b)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(- (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale))))
(- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))
(- (+ (* a (+ (* a (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 a (fma.f64 a (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))
(- (+ (* a (+ (* a (- (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))))
(fma.f64 a (fma.f64 a (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 a a))))))
(* (pow a 4) (- (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 a a))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 a a))))))
(* (pow a 4) (- (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) a)) a)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))) a)) a)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale x-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/196830000 binary64) (*.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 x-scale x-scale))) (*.f64 #s(literal -4 binary64) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (- (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 2))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))))) (* 4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/196830000 binary64) (*.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 x-scale x-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (/.f64 (*.f64 (*.f64 (-.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.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)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a))))) (*.f64 x-scale x-scale))))))) (*.f64 #s(literal -4 binary64) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(- (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(/ (- (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* 4 (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))))) (*.f64 x-scale x-scale))
(* 1/32400 (* (pow angle 2) (pow (PI) 2)))
(*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64))))
(* (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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64))))
(* (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 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 8 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64))))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
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 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64) (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #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 (*.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 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/32400 binary64))) #s(literal 1 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2)))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) #s(literal 0 binary64)))
(+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2)))))))))
(fma.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 1/393660000 binary64))) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -4 (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2))) (* (pow angle 2) (+ (* -8 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/51018336000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 2))))))) (pow x-scale 2))))))))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 1/393660000 binary64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/2040733440000000 binary64) (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 13/1224440064000000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale)) #s(literal -17/765275040000000 binary64))))) (*.f64 x-scale x-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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow x-scale 2))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale))) (*.f64 y-scale y-scale))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.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)))) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* (pow a 2) (* (pow b 2) (+ (* -8 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))) (pow x-scale 2))))))
(*.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (* (pow b 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2))))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 b b) #s(literal 0 binary64))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2)))))) (* (pow b 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) (*.f64 b b)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 1/393660000 binary64))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) #s(literal 0 binary64))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (+ (* 1/1224440064000000 (pow (PI) 6)) (+ (* 1/102036672000000 (pow (PI) 6)) (* 1/32400 (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/51018336000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 2))))))) (pow x-scale 2)))))) (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (+ (* -1/1049760000 (pow (PI) 4)) (* -1/3149280000 (pow (PI) 4)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2))))))) (* (pow b 2) (+ (* -1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 1/4050 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) #s(literal 0 binary64) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) (*.f64 b b)) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/2040733440000000 binary64) (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 13/1224440064000000 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale)) #s(literal -17/765275040000000 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/787320000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 1/393660000 binary64))) (*.f64 x-scale x-scale))))))))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (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)))) (* -4 (/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2)))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (pow b 2) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (pow y-scale 2))) (* -4 (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2))))))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (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 a a) #s(literal -4 binary64)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 x-scale x-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(/ (* (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))) (* -4 (/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (pow x-scale 2))))) (pow y-scale 2))
(/.f64 (*.f64 (*.f64 b b) (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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale)))) (*.f64 y-scale y-scale))
(pow b 2)
(*.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)
(pow b 2)
(*.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)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b 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 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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a 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 a 2) (pow (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a 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 a 2) (pow (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a 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 a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a 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 a 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) (fma.f64 (*.f64 b b) (/.f64 (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 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) (fma.f64 (*.f64 b b) (/.f64 (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 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) (fma.f64 (*.f64 b b) (/.f64 (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 (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a 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 a 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) (fma.f64 (*.f64 b b) (/.f64 (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 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) (fma.f64 (*.f64 b b) (/.f64 (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 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) (fma.f64 (*.f64 b b) (/.f64 (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 b 2) (pow x-scale 2))
(/.f64 (*.f64 b b) (*.f64 x-scale x-scale))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))))) (/ (pow b 2) (pow x-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 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))))))) (/ (pow b 2) (pow x-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)))
(+ (* (pow angle 2) (+ (* -1/32400 (/ (* (pow b 2) (pow (PI) 2)) (pow x-scale 2))) (+ (* 1/32400 (/ (* (pow a 2) (pow (PI) 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) (pow x-scale 2))) (+ (* (pow angle 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 b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow x-scale 2)))))))) (/ (pow b 2) (pow x-scale 2)))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (/.f64 (*.f64 (*.f64 b b) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 angle angle) (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 (*.f64 angle angle) (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 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 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)) (*.f64 (PI.f64) (PI.f64))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 b b) (*.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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a 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 a 2) (pow (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a 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 a 2) (pow (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a 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 a 2) (pow (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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a 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 (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b 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 b 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) (fma.f64 (*.f64 a a) (/.f64 (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 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) (fma.f64 (*.f64 a a) (/.f64 (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 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) (fma.f64 (*.f64 a a) (/.f64 (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 (cos (* 1/180 (* angle (PI)))) 2)) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 b 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 b 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) (fma.f64 (*.f64 a a) (/.f64 (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 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) (fma.f64 (*.f64 a a) (/.f64 (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 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) (fma.f64 (*.f64 a a) (/.f64 (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 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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (+ (* (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))
(/ (* (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)))
(fma.f64 (*.f64 b b) (/.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 (*.f64 (*.f64 a 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)))
(fma.f64 (*.f64 b b) (/.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 (*.f64 (*.f64 a 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)))
(fma.f64 (*.f64 b b) (/.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 (*.f64 (*.f64 a 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))
(/.f64 (*.f64 (*.f64 a 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) (fma.f64 (*.f64 b b) (/.f64 (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) (fma.f64 (*.f64 b b) (/.f64 (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) (fma.f64 (*.f64 b b) (/.f64 (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 (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) (fma.f64 (*.f64 b b) (/.f64 (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) (fma.f64 (*.f64 b b) (/.f64 (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) (fma.f64 (*.f64 b b) (/.f64 (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 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 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 angle angle) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 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 (*.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) (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 a a) (*.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 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 a a) (*.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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 y-scale y-scale))
(/ (* (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)))
(fma.f64 (*.f64 b b) (/.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 (*.f64 (*.f64 a 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)))
(fma.f64 (*.f64 b b) (/.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 (*.f64 (*.f64 a 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)))
(fma.f64 (*.f64 b b) (/.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 (*.f64 (*.f64 a 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 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) (fma.f64 (*.f64 a a) (/.f64 (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) (fma.f64 (*.f64 a a) (/.f64 (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) (fma.f64 (*.f64 a a) (/.f64 (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 (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) (fma.f64 (*.f64 a a) (/.f64 (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) (fma.f64 (*.f64 a a) (/.f64 (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) (fma.f64 (*.f64 a a) (/.f64 (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 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 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 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 b b) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #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 y-scale y-scale))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.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 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.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)))) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 a a) (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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.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 x-scale x-scale))))) (*.f64 y-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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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)))))
(fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 4 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 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 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)))) (* 4 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 4 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 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -8 (/ (* (pow a 2) (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)))) (* (pow x-scale 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)))))
(fma.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (*.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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 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)))) (* 4 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.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 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* 1/8100 (/ (* (pow angle 2) (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 angle angle) (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (* (pow angle 2) (+ (* -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)))))))))
(*.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 angle angle)) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* 4 (* (pow angle 2) (+ (* 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))))))) (* 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))))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.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 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* (pow angle 2) (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 2) (+ (* 4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow (PI) 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/3149280000 (/ (* (pow (PI) 4) (* (+ (* 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/32400 (/ (* (pow (PI) 2) (* (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6))) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ (* -1/396718580736000000000 (pow (PI) 8)) (* -1/2777030065152000000000 (pow (PI) 8))) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 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))))))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 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 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -1/3149280000 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.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 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 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 8 binary64)) #s(literal -1/347128758144000000000 binary64)) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.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 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(pow b 2)
(*.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)
(pow b 2)
(*.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)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow a 2)
(*.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)
(pow a 2)
(*.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)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 b b) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale)))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale)))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale)))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale y-scale))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale y-scale))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))
(/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 x-scale y-scale))
(+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale)))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 x-scale y-scale)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale))))) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 x-scale y-scale)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* x-scale y-scale)))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.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)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b))))) (*.f64 x-scale y-scale))))) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)))))) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale y-scale))
(+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 a a) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale y-scale)))
(+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale y-scale)))
(+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 x-scale y-scale)))
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale y-scale))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale y-scale))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 x-scale y-scale))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale y-scale))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 x-scale y-scale)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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 x-scale y-scale))))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.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 x-scale y-scale))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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 x-scale y-scale))))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 angle (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(*.f64 angle (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/8748000 binary64)) (/.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/8748000 binary64)))) (/.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 x-scale y-scale)) #s(literal -29/30855889612800000000 binary64) (/.f64 (*.f64 #s(literal -1/881596846080000000 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/8748000 binary64)))) (/.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
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 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64) (*.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/1574640000 binary64) (*.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64))) #s(literal 1 binary64))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))
(*.f64 angle (fma.f64 (PI.f64) #s(literal 1/90 binary64) (*.f64 (*.f64 #s(literal -1/4374000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (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 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/4374000 binary64) (*.f64 (*.f64 #s(literal 1/708588000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 (PI.f64) #s(literal 1/90 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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/708588000000 binary64) (*.f64 (*.f64 #s(literal -1/241061637600000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/4374000 binary64))) (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 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 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64) (*.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #s(literal 1 binary64))
(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))))
(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))))
(* 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 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.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 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* 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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (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))))
(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 x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (pow a 2) (pow x-scale 2))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -1/16200 (/ (* (pow a 2) (* (pow angle 2) (pow (PI) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))
(fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 angle (PI.f64)) (*.f64 angle (PI.f64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (pow a 2) (* (pow angle 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2))))))) (pow x-scale 2)))) (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 angle angle) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 1/393660000 binary64))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/16200 binary64))) (/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* (pow angle 2) (+ (* -1/16200 (/ (* (pow a 2) (pow (PI) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (/ (* (pow a 2) (* (pow angle 2) (+ (* -1/16200 (/ (* (pow (PI) 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))) (pow y-scale 2))) (+ (* -1/51018336000000 (/ (pow (PI) 6) (pow y-scale 2))) (+ (* -1/408146688000000 (/ (pow (PI) 6) (pow y-scale 2))) (* -1/6122200320000000 (/ (pow (PI) 6) (pow y-scale 2)))))))) (pow x-scale 2)) (/ (* (pow a 2) (+ (* 1/6298560000 (/ (pow (PI) 4) (pow y-scale 2))) (+ (* 1/2099520000 (/ (pow (PI) 4) (pow y-scale 2))) (* 1/524880000 (/ (pow (PI) 4) (pow y-scale 2)))))) (pow x-scale 2)))))) (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 (*.f64 a a) (+.f64 (/.f64 (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 1/393660000 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/16200 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (*.f64 y-scale y-scale)) #s(literal -17/765275040000000 binary64)))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) #s(literal -1/16200 binary64))) (/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (/ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)) (/ (pow (sin (* 1/180 (* angle (PI)))) 4) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) (+ (pow (cos (* 1/180 (* angle (PI)))) 4) (pow (sin (* 1/180 (* angle (PI)))) 4))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-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 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64) (*.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #s(literal 1 binary64))
(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))))
(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))))
(- (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-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 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)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 a #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.f64 (*.f64 (*.f64 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 b #s(literal 4 binary64)))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(- (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 y-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 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)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.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 -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.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))) (fma.f64 (*.f64 a 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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 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)))) (* (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)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.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))) (fma.f64 (*.f64 a 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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (pow.f64 b #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (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 a a) (*.f64 (*.f64 x-scale x-scale) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 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))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (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 a a) (*.f64 (*.f64 x-scale x-scale) (*.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)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 4) (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (-.f64 (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 #s(literal -8 binary64) (*.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 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (pow.f64 a #s(literal 4 binary64)))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (PI.f64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (PI.f64) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 #s(literal 1/32400 binary64) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.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)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* 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 (*.f64 #s(literal -1/34992000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.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 (*.f64 angle angle) (fma.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64) (*.f64 (*.f64 #s(literal 1/22674816000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)))) (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(* 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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/22674816000000 binary64) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (*.f64 #s(literal -1/30855889612800000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/34992000 binary64))) (*.f64 #s(literal 1/180 binary64) (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))))
(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))))

rewrite323.0ms (0.2%)

Memory
-18.4MiB live, 744.0MiB allocated
Rules
5 380×lower-*.f32
5 294×lower-*.f64
3 582×lower-/.f32
3 546×lower-/.f64
3 360×lower-fma.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01441205
02481051
1871871
27742871
08234866
Stop Event
iter limit
node limit
iter limit
Counts
31 → 611
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64)))))
(*.f64 (*.f64 b b) (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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal -8 binary64)) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(*.f64 b b)
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)
(/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (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(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
#s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 x-scale (*.f64 y-scale y-scale))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (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))))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
Outputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(neg.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
(/.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale))) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (*.f64 a a)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale y-scale)) y-scale)
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal -1 binary64))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b (*.f64 b (*.f64 a a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal -4 binary64) x-scale) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 #s(literal 4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) x-scale))
(*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a a)))
(*.f64 (*.f64 b (*.f64 b (*.f64 a a))) #s(literal -4 binary64))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a)
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a a)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
(*.f64 b (*.f64 b #s(literal -4 binary64)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(*.f64 (*.f64 b #s(literal -4 binary64)) b)
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (PI.f64))) #s(literal 180 binary64))
(/.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)) #s(literal 180 binary64))
(*.f64 #s(literal 2 binary64) (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 angle (*.f64 (*.f64 #s(literal 1/180 binary64) (PI.f64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/180 binary64) (*.f64 (*.f64 angle (PI.f64)) #s(literal 2 binary64)))
(*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (*.f64 (PI.f64) #s(literal 2 binary64)))
(*.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 1/90 binary64) angle) (PI.f64))
(*.f64 (*.f64 #s(literal 2 binary64) angle) (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 #s(literal 1/90 binary64) (*.f64 angle (PI.f64)))
(*.f64 (*.f64 #s(literal 2 binary64) (PI.f64)) (*.f64 angle #s(literal 1/180 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle (PI.f64))) #s(literal 1/180 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) #s(literal 1 binary64)) (PI.f64))
(*.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (cbrt.f64 (*.f64 (PI.f64) (PI.f64)))) (cbrt.f64 (PI.f64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/90 binary64) angle) (sqrt.f64 (PI.f64))) (sqrt.f64 (PI.f64)))
(+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(+.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 2 binary64)) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))))
(fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (*.f64 (+.f64 b a) (-.f64 b a)) #s(literal 2 binary64)) (pow.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (exp.f64 (log.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale))) (exp.f64 (log.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale))) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal 4 binary64)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(fma.f64 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) x-scale) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 2 binary64))) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 6 binary64)) (pow.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)) (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))))) (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64)))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64))))
(pow.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) #s(literal 2 binary64))
(*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (exp.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))) #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)))
(/.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) #s(literal 2 binary64))
(*.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
(*.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))))
(*.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(+.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(-.f64 (/.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)) (fma.f64 a (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))) (/.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (fma.f64 a (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))))
(fma.f64 a (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 a (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -8 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal -8 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a a)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 #s(literal -8 binary64) (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 a a) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(fma.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)) #s(literal -4 binary64) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(fma.f64 (/.f64 a x-scale) (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(fma.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal -8 binary64) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(fma.f64 (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) a (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))
(fma.f64 (*.f64 (*.f64 a a) #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64))) (fma.f64 (pow.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) #s(literal -512 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 a (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))) (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) #s(literal -512 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64))))
(/.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) #s(literal -512 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))) (fma.f64 a (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) #s(literal -512 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 a (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))))
(*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) #s(literal -512 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 a (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))) (*.f64 b b)))
(+.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(+.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 b (*.f64 b (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 b (*.f64 b (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 b b)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)) (*.f64 b b)) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 (*.f64 a a) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b b)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 b b)) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 b b) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 (*.f64 b b) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) (*.f64 b b) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 b (*.f64 b (*.f64 a a))) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -8 binary64) (*.f64 b b)) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) b) b (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 (*.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) b) b (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 (*.f64 b b) a) (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 (*.f64 (*.f64 b b) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal -4 binary64) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))))
(fma.f64 (*.f64 (*.f64 b b) (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64)))) (*.f64 a a) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(fma.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #s(literal -8 binary64) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a))))) (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))))) (-.f64 (*.f64 (*.f64 (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal -8 binary64))) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))
(/.f64 (*.f64 (*.f64 b b) (fma.f64 (pow.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) #s(literal -512 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64))))
(/.f64 (*.f64 (*.f64 b b) (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64)))) (fma.f64 a (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))
(/.f64 (*.f64 (fma.f64 (pow.f64 (*.f64 (*.f64 a a) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) #s(literal -512 binary64) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 3 binary64))) (*.f64 b b)) (fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (-.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))) (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))) #s(literal 2 binary64))) (*.f64 b b)) (fma.f64 a (*.f64 (*.f64 a #s(literal -8 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale)))))
(*.f64 b (*.f64 b (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))))
(*.f64 (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))) (*.f64 b b))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a)))))
(*.f64 (*.f64 b (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))) b)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64))
(*.f64 b b)
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(neg.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (neg.f64 x-scale)))
(neg.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 x-scale)) x-scale))
(/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) x-scale)
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (neg.f64 (neg.f64 x-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (*.f64 (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 x-scale)) (neg.f64 x-scale))
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b b)) (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b b)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b b))) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (-.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 (-.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64))) (*.f64 (*.f64 x-scale x-scale) (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b b)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -1 binary64)) (*.f64 (neg.f64 x-scale) (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) #s(literal 1 binary64)) x-scale)
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) #s(literal -1 binary64)) (neg.f64 x-scale))
(pow.f64 (*.f64 x-scale (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
(neg.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale) (neg.f64 y-scale)))
(neg.f64 (/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (neg.f64 y-scale)) y-scale))
(/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale) y-scale)
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (neg.f64 y-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)) (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)))))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale) #s(literal 1 binary64)) y-scale)
(/.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 y-scale (neg.f64 y-scale)))
(pow.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (neg.f64 y-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale))
(+.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale)) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (neg.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) #s(approx (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) x-scale)) (/.f64 #s(literal 4 binary64) y-scale) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 #s(literal 1 binary64) y-scale) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))) (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(/.f64 (+.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (+.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(/.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
#s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64))
(*.f64 b b)
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)))
(pow.f64 a #s(literal 2 binary64))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a)) #s(literal 2 binary64))
(*.f64 a a)
(*.f64 (exp.f64 (log.f64 a)) (exp.f64 (log.f64 a)))
(+.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))
(+.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(+.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(fma.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))))
(neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale) (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 y-scale (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 y-scale (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))))
(/.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (neg.f64 x-scale)))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 x-scale)) (/.f64 (neg.f64 y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b b))) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b b)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 (*.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) #s(literal 1 binary64)) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64)))) (*.f64 y-scale (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) y-scale)
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (+.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 4 binary64)))) (-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) x-scale)
(/.f64 (*.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) x-scale)
(pow.f64 (/.f64 y-scale (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (neg.f64 y-scale)))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) #s(literal 1 binary64)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (neg.f64 y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(neg.f64 (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (neg.f64 y-scale)))
(neg.f64 (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (neg.f64 x-scale)) y-scale))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))))))
(/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (neg.f64 x-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale (neg.f64 x-scale)))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 1 binary64)) y-scale)
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) x-scale)
(pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1 binary64))
(*.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale) y-scale))
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) y-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (neg.f64 x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) x-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) x-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 (*.f64 y-scale y-scale) x-scale)
(*.f64 (*.f64 x-scale y-scale) y-scale)
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) x-scale)
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)
(*.f64 (*.f64 (*.f64 x-scale x-scale) y-scale) y-scale)
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos.f64 (fma.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)) (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (exp.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (+.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 (+.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (-.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))))
(*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 1 binary64)))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 1 binary64)))
(sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (*.f64 a a) (neg.f64 (*.f64 x-scale x-scale))))
(neg.f64 (/.f64 (neg.f64 (*.f64 a a)) (*.f64 x-scale x-scale)))
(/.f64 (*.f64 a a) (*.f64 x-scale x-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 a a)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a a)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 a a) x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a a))))
(/.f64 (neg.f64 (*.f64 a a)) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (/.f64 (*.f64 a a) x-scale) x-scale)
(/.f64 (*.f64 (*.f64 a a) #s(literal 1 binary64)) (*.f64 x-scale x-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 a a))) (neg.f64 (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a a) x-scale)) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a x-scale) a) x-scale)
(pow.f64 (/.f64 a x-scale) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a a)) #s(literal -1 binary64))
(*.f64 a (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)))
(*.f64 (neg.f64 (*.f64 a a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 a x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 a a))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) a)
(+.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 a (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 a (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 a x-scale) (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (/.f64 a x-scale) (*.f64 (/.f64 a x-scale) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (*.f64 a a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) a) (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 a x-scale)) (/.f64 a x-scale) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) a) (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 a x-scale)) (/.f64 a x-scale) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 x-scale x-scale) (*.f64 a a)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))))))
(/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (*.f64 a a) (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a a) (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)))) (*.f64 (*.f64 x-scale x-scale) (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (*.f64 a a) (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 #s(literal 1 binary64) (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a a)) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a a)) (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a a)) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 (neg.f64 (*.f64 x-scale x-scale)) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 x-scale (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)))) (*.f64 x-scale (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (*.f64 x-scale (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 a a)) (*.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) #s(literal 1 binary64)) (*.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 x-scale x-scale) (*.f64 a a))))
(/.f64 (*.f64 (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (neg.f64 (*.f64 a a))) (*.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 a a) x-scale)) (*.f64 (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))) x-scale))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (*.f64 a a)) (*.f64 (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (*.f64 x-scale x-scale) (*.f64 a a))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (neg.f64 (*.f64 a a))) (*.f64 (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (/.f64 (*.f64 a a) x-scale)) (*.f64 (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) x-scale))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (*.f64 a a)) (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 x-scale x-scale) (*.f64 a a))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (neg.f64 (*.f64 a a))) (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (*.f64 a a) x-scale)) (*.f64 (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)) x-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (fma.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (-.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 a a) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)))) (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale x-scale) (*.f64 a a)))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (neg.f64 (*.f64 a a))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 a a) x-scale)) x-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (/.f64 (*.f64 x-scale x-scale) (*.f64 a a)))
(/.f64 (*.f64 (neg.f64 (*.f64 a a)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) x-scale)
(/.f64 (*.f64 (fma.f64 y-scale (*.f64 y-scale (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (*.f64 y-scale (*.f64 y-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 3 binary64))) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (fma.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64)) (pow.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) #s(literal 2 binary64))) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) x-scale) x-scale)
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))))
(*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))))
(*.f64 (*.f64 a a) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))))
(*.f64 (*.f64 (*.f64 a a) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) x-scale))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) a) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (/.f64 a x-scale)) (/.f64 a x-scale))
(exp.f64 (*.f64 (log.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 1 binary64)))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)))
(+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) x-scale)) (/.f64 #s(literal 4 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))))
(/.f64 (-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale y-scale))) y-scale)
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) y-scale) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 (*.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) y-scale))) (*.f64 (*.f64 y-scale y-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) y-scale) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (*.f64 y-scale (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))))) (*.f64 y-scale (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) y-scale) y-scale) (*.f64 y-scale (/.f64 (*.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) x-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale y-scale)))) (*.f64 y-scale y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) y-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (*.f64 y-scale (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale x-scale))) y-scale))) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))) #s(literal 1 binary64)))
(sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1 binary64))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 1/2 binary64)))

eval493.0ms (0.3%)

Memory
60.5MiB live, 1 315.4MiB allocated
Compiler

Compiled 277 946 to 7 016 computations (97.5% saved)

prune3.6s (2.4%)

Memory
-30.2MiB live, 13 142.8MiB allocated
Pruning

24 alts after pruning (24 fresh and 0 done)

PrunedKeptTotal
New2 690192 709
Fresh21526
Picked505
Done000
Total2 716242 740
Accuracy
87.3%
Counts
2 740 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.4%
(fma.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
24.3%
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
22.2%
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
25.6%
(/.f64 (/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-scale) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (*.f64 x-scale x-scale)) (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) y-scale) y-scale)
29.0%
(/.f64 #s(approx (- (pow (/ (* (* (+ b a) (- b a)) (sin (* 2 (* (* angle 1/180) (PI))))) x-scale) 2) (* (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (/ (* 4 (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) (* x-scale x-scale)))) (fma.f64 b (fma.f64 b (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))) (*.f64 x-scale x-scale)))))) (*.f64 y-scale y-scale))
25.0%
(-.f64 (pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
25.8%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))) x-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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
24.9%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a #s(approx (cos (* (/ angle 180) (PI))) #s(literal 1 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
26.3%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(approx (/ (/ (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI))))))))) x-scale) (/ y-scale (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
28.9%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
22.9%
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) x-scale) y-scale) (exp.f64 (*.f64 (log.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (sin.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))) #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
23.7%
(-.f64 #s(approx (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 b (*.f64 b (*.f64 b b))))) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) x-scale) x-scale)) (/.f64 (/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))) #s(literal 2 binary64))) y-scale) y-scale)))
58.5%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 y-scale y-scale)) x-scale))
64.9%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale y-scale)) y-scale))
64.5%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale))
58.8%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
61.3%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
59.2%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale))
61.6%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)))
63.5%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))
63.0%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) x-scale)))
43.4%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b (fma.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (+.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #s(literal 4 binary64)))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -8 binary64) (*.f64 a a))))) b))
72.0%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
65.0%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
Compiler

Compiled 3 102 to 1 442 computations (53.5% saved)

simplify184.0ms (0.1%)

Memory
-6.3MiB live, 391.0MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff384
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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-diff768
(/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
cost-diff6144
(pow.f64 a #s(literal 2 binary64))
cost-diff6144
(pow.f64 b #s(literal 2 binary64))
cost-diff0
(*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale))
cost-diff0
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
cost-diff128
(neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))
cost-diff256
(fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
cost-diff0
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
cost-diff0
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
cost-diff384
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
cost-diff0
(*.f64 #s(literal -4 binary64) (*.f64 b b))
cost-diff0
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
cost-diff0
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
cost-diff0
(*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
cost-diff0
(*.f64 b #s(literal -4 binary64))
cost-diff0
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
Rules
6 812×lower-*.f32
6 728×lower-*.f64
4 570×lower-fma.f32
4 558×lower-fma.f64
2 050×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01331895
02261853
14601800
215001791
363011791
080361786
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
a
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
a
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale))
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
a
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(*.f64 x-scale x-scale)
x-scale
(*.f64 y-scale y-scale)
y-scale
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale))
(neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))
(*.f64 a a)
a
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))
(PI.f64)
(*.f64 #s(literal 1/90 binary64) angle)
#s(literal 1/90 binary64)
angle
(*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(*.f64 b b)
b
(/.f64 #s(literal 4 binary64) x-scale)
#s(literal 4 binary64)
x-scale
(/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale)
(fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale)
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
#s(literal 2 binary64)
(*.f64 y-scale y-scale)
y-scale
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-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))))
#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))
b
(pow.f64 a #s(literal 2 binary64))
a
(sin.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
#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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))
(*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))))
(sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 #s(literal 1/180 binary64) (PI.f64))
#s(literal 1/180 binary64)
(*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
(/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(*.f64 x-scale y-scale)
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
#s(literal 1/2 binary64)
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle #s(literal 1/180 binary64))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a a)
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64))
(/.f64 #s(literal 1 binary64) x-scale)
#s(literal 1 binary64)
#s(literal 4 binary64)
Outputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
a
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
a
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale))
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
a
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(*.f64 x-scale x-scale)
x-scale
(*.f64 y-scale y-scale)
y-scale
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))))) (*.f64 x-scale x-scale)))
(*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))) x-scale)
(neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))
(fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))
(fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))
(*.f64 a a)
a
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))
#s(literal 1/2 binary64)
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))
(PI.f64)
(*.f64 #s(literal 1/90 binary64) angle)
(*.f64 angle #s(literal 1/90 binary64))
#s(literal 1/90 binary64)
angle
(*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))
(*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
#s(literal -1/2 binary64)
(*.f64 b b)
b
(/.f64 #s(literal 4 binary64) x-scale)
#s(literal 4 binary64)
x-scale
(/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale)
(/.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale)
(fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)))
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale)
(*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
#s(literal 2 binary64)
(*.f64 y-scale y-scale)
y-scale
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
(fma.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal -4 binary64) (*.f64 x-scale y-scale))) (*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (/.f64 (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))))))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (/.f64 (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))) (*.f64 x-scale y-scale)))) (*.f64 (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-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 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (/.f64 (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))) (*.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 #s(literal 2 binary64) (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 (cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 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 #s(literal 2 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (cos.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 (sin.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64)))) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))
(*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64))))
(*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.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)
b
(pow.f64 a #s(literal 2 binary64))
(*.f64 a a)
a
(sin.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(sin.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
#s(literal 180 binary64)
(PI.f64)
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (*.f64 (PI.f64) (/.f64 angle #s(literal 180 binary64))))
x-scale
y-scale
(*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a))))
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a))))
(sin.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))
(*.f64 #s(literal 1/180 binary64) (PI.f64))
(*.f64 (PI.f64) #s(literal 1/180 binary64))
#s(literal 1/180 binary64)
(*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 (+.f64 b a) (*.f64 #s(literal 2 binary64) (-.f64 b a)))
(*.f64 (+.f64 b a) (-.f64 b a))
(+.f64 b a)
(-.f64 b a)
(/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale))
(/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(*.f64 x-scale y-scale)
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)))) (*.f64 x-scale y-scale))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale))
(/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale)
(/.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale)
(fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 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 angle #s(literal 1/180 binary64)) (PI.f64)))))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))
(*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))
(*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))
(*.f64 angle #s(literal 1/180 binary64))
(*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 a (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))
(/.f64 y-scale (fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))))
(fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))
(fma.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))
(*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 b (fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(*.f64 a a)
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)
(/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64))
(/.f64 #s(literal 4 binary64) x-scale)
(/.f64 #s(literal 1 binary64) x-scale)
#s(literal 1 binary64)
#s(literal 4 binary64)

localize1.1s (0.7%)

Memory
22.2MiB live, 2 529.6MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy22.436309072471605
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
accuracy22.50963864514903
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
accuracy22.50963864514903
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
accuracy34.734968188794994
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
accuracy15.732177184993455
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
accuracy22.421452421201547
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
accuracy22.436309072471605
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
accuracy39.45901109797407
(fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
accuracy2.612591807058991
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
accuracy8.022667156336922
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy11.146731907565352
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale))
accuracy14.193704548813262
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
accuracy4.94102092996728
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy7.637510454870388
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy8.022667156336922
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy8.946497406546786
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
accuracy3.3530295676035236
(*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
accuracy3.8194091853012675
(*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
accuracy4.94102092996728
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
accuracy7.637510454870388
(*.f64 x-scale (*.f64 y-scale y-scale))
Samples
457.0ms163×1valid
336.0ms80×2valid
22.0ms5exit
6.0ms1exit
4.0ms0valid
Compiler

Compiled 1 887 to 126 computations (93.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 651.0ms
ival-mult: 160.0ms (24.6% of total)
ival-cos: 155.0ms (23.8% of total)
ival-sin: 115.0ms (17.7% of total)
ival-div: 63.0ms (9.7% of total)
adjust: 55.0ms (8.4% of total)
ival-pow2: 31.0ms (4.8% of total)
const: 27.0ms (4.1% of total)
ival-add: 25.0ms (3.8% of total)
ival-sub: 13.0ms (2% of total)
ival-pi: 3.0ms (0.5% of total)
ival-neg: 2.0ms (0.3% of total)
exact: 1.0ms (0.2% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series330.0ms (0.2%)

Memory
9.1MiB live, 756.9MiB allocated
Counts
30 → 1 044
Calls
Call 1
Inputs
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())
#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())
#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())
#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())
#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())
#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<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 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())
#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())
#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())
#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<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 (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())
Outputs
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (patch (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor inf a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor inf a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor inf a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor -inf a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf a) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))) (taylor 0 angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))))))) (taylor 0 angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2))))) (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 2)))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2))))))))))) (taylor 0 angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor inf angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (taylor -inf angle) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2)) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))) (taylor 0 b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor inf b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor inf b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))) (taylor inf b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))) (taylor inf b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (taylor -inf b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))) (taylor -inf b) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (patch (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor 0 a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor 0 a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor 0 a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor 0 a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor inf a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor inf a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor inf a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor inf a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor -inf a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor -inf a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor -inf a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor -inf a) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (pow a 2)) (taylor 0 angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow a 2)) (taylor 0 angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4)))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow a 2)) (taylor 0 angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6)))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4)))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow a 2)) (taylor 0 angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (taylor inf angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (taylor inf angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (taylor inf angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (taylor inf angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (taylor -inf angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (taylor -inf angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (taylor -inf angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))) (taylor -inf angle) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor 0 b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor 0 b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor 0 b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (- (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor 0 b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor inf b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor inf b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor inf b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor inf b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor -inf b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor -inf b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor -inf b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (taylor -inf b) (#s(alt (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (patch (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 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))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (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))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (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)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (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))))) (taylor 0 a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow a 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow a 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor inf a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (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))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 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)))))))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 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)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 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)))))))))))) (taylor 0 angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf angle) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 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))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (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))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (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)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (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))))) (taylor 0 b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))) (taylor inf b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (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))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) (patch (/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)) (taylor 0 a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))) (taylor 0 a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))) (taylor 0 a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))) (taylor 0 a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)) (taylor inf a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor inf a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor inf a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor inf a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)) (taylor -inf a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor -inf a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor -inf a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor -inf a) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (pow a 2) x-scale)) (taylor 0 angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale))))) (* -4 (/ (pow a 2) x-scale))) (taylor 0 angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (pow a 2) x-scale)) (* (pow angle 2) (+ (* -4 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) x-scale)) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale))))) (* -4 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale))))))) (taylor 0 angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (/ (pow a 2) x-scale)) (* (pow angle 2) (+ (* -4 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)))) (* (pow angle 2) (+ (* -4 (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) x-scale)) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) x-scale))))) (* -4 (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) x-scale)) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale))))))))) (taylor 0 angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor inf angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor inf angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor inf angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor inf angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor -inf angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor -inf angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor -inf angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor -inf angle) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)) (taylor 0 b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))) (taylor 0 b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))) (taylor 0 b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (+ (* -4 (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))) (taylor 0 b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)) (taylor inf b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor inf b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor inf b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor inf b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)) (taylor -inf b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor -inf b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor -inf b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale)))) (taylor -inf b) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor 0 x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor 0 x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor 0 x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor 0 x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor inf x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor inf x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor inf x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor inf x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor -inf x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor -inf x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor -inf x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (+ (* (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)) (taylor -inf x-scale) (#s(alt (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (patch (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) #<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 (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 (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 (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 (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 (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 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor 0 b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale)))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale))))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale))))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor -inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale)))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale))))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale))))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale)))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* x-scale y-scale)))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale))))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale))))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale))))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale))))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (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 y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (patch (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) #<representation binary64>) () ())) ())
#s(alt (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale)))))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))))) (taylor 0 angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf angle) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (patch (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (+ 1 (* -1/16200 (* (pow angle 2) (pow (PI) 2)))) (taylor 0 angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/90 (* angle (PI))) (taylor 0 angle) (#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 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 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (sin (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (patch (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #<representation binary64>) () ())) ())
#s(alt (* 1/32400 (* (pow angle 2) (pow (PI) 2))) (taylor 0 angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<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 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6))))))) (taylor 0 angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* 1/765275040000000 (pow (PI) 6)))))))) (taylor 0 angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor inf angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (taylor -inf angle) (#s(alt (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (patch (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3))))) (* (pow x-scale 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))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* (pow b 3) (* (pow x-scale 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))))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2)))))) (taylor inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (/ (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) b))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow b 4) (- (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (/ (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) b))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf b) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3))))) (* (pow x-scale 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))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (+ (* 4 (/ (* (pow b 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* (pow a 3) (* (pow x-scale 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))))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2)))))) (taylor inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))))) (taylor -inf a) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ a b) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ a b) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))))) (taylor -inf angle) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor 0 y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)) (taylor -inf y-scale) (#s(alt (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) (patch (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale))) #<representation binary64>) () ())) ())
#s(alt 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/180 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (patch (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) #<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 (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 (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 1 (taylor 0 angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<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 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
#s(alt (cos (* 1/90 (* angle (PI)))) (taylor -inf angle) (#s(alt (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) (patch (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))) #<representation binary64>) () ())) ())
Calls

261 calls:

TimeVariablePointExpression
49.0ms
b
@inf
(/ (+ (* (* (neg (+ (* (* a a) (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2)) (* (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2) (* b b)))) (/ 4 x-scale)) (/ (+ (* b (* b (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2))) (* (* a a) (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2))) x-scale)) (pow (/ (* (sin (* (PI) (* 1/90 angle))) (* (+ b a) (- b a))) x-scale) 2)) (* y-scale y-scale))
8.0ms
b
@-inf
(- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* (* (sin (* angle (* 1/180 (PI)))) (* 2 (* (+ b a) (- b a)))) (/ (cos (* angle (* 1/180 (PI)))) (* x-scale y-scale)))) (* (/ (/ (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI))))))))) x-scale) (/ y-scale (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) (/ (* (/ 1 x-scale) 4) y-scale)))
6.0ms
y-scale
@0
(/ (+ (* (* (neg (+ (* (* a a) (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2)) (* (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2) (* b b)))) (/ 4 x-scale)) (/ (+ (* b (* b (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2))) (* (* a a) (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2))) x-scale)) (pow (/ (* (sin (* (PI) (* 1/90 angle))) (* (+ b a) (- b a))) x-scale) 2)) (* y-scale y-scale))
3.0ms
x-scale
@0
(+ (* (* (neg (+ (* (* a a) (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2)) (* (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2) (* b b)))) (/ 4 x-scale)) (/ (+ (* b (* b (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2))) (* (* a a) (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2))) x-scale)) (pow (/ (* (sin (* (PI) (* 1/90 angle))) (* (+ b a) (- b a))) x-scale) 2))
3.0ms
x-scale
@0
(- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (* (* (sin (* angle (* 1/180 (PI)))) (* 2 (* (+ b a) (- b a)))) (/ (cos (* angle (* 1/180 (PI)))) (* x-scale y-scale)))) (* (/ (/ (+ (* b (* b (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* a (* a (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI))))))))) x-scale) (/ y-scale (+ (* b (* b (- 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))) (* (* a a) (+ 1/2 (* 1/2 (cos (* 2 (* (* angle 1/180) (PI)))))))))) (/ (* (/ 1 x-scale) 4) y-scale)))

simplify641.0ms (0.4%)

Memory
5.5MiB live, 1 210.6MiB allocated
Algorithm
egg-herbie
Rules
7 946×lower-fma.f64
7 946×lower-fma.f32
6 474×lower-+.f64
6 474×lower-+.f32
4 950×lower-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
0129251656
1494549358
0833047281
Stop Event
iter limit
node limit
Counts
1 044 → 1 044
Calls
Call 1
Inputs
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2))))) (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 2)))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))))))))))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2)) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(- (* -1 (* (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 (* (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 (* (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 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* -1 (pow a 2))
(- (* -1 (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow a 2))
(- (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4)))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow a 2))
(- (* (pow angle 2) (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6)))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4)))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow a 2))
(* -1 (+ (* (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 (+ (* (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 (+ (* (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 (+ (* (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 (+ (* (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 (+ (* (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 (+ (* (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 (+ (* (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 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(- (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(- (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(- (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow b 2) (- (* -1 (/ (* (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 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(* (pow b 2) (- (* -1 (/ (* (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 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (pow y-scale 2))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 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))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (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)))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (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)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (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 a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow a 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow a 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
(/ (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (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))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 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))))))))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 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)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 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))))))))))))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (pow y-scale 2))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 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))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (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)))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (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)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (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 b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
(/ (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (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))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(+ (* -4 (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(+ (* -4 (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(+ (* -4 (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* -4 (/ (pow a 2) x-scale))
(+ (* -4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale))))) (* -4 (/ (pow a 2) x-scale)))
(+ (* -4 (/ (pow a 2) x-scale)) (* (pow angle 2) (+ (* -4 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) x-scale)) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale))))) (* -4 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)))))))
(+ (* -4 (/ (pow a 2) x-scale)) (* (pow angle 2) (+ (* -4 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)))) (* (pow angle 2) (+ (* -4 (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) x-scale)) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) x-scale))))) (* -4 (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) x-scale)) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)))))))))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(+ (* -4 (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(+ (* -4 (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(+ (* -4 (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(* -4 (/ (+ (* (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))
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow b 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(pow a 2)
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))
(+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale)))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* x-scale y-scale)))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 y-scale))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 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)))))))) (+ (* (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 y-scale))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
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)))))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(* 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))))))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 1/90 (* angle (PI))))
(sin (* 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) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6)))))))
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* 1/765275040000000 (pow (PI) 6))))))))
(+ 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))))))
(- (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3))))) (* (pow x-scale 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))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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)))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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)))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* (pow b 3) (* (pow x-scale 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))))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (/ (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) b))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (/ (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) b))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 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)))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3))))) (* (pow x-scale 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))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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)))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 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)))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* (pow a 3) (* (pow x-scale 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))))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ a b) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ a b) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-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)))))))
(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))))
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)))))))
(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))))
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)))))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
(cos (* 1/90 (* angle (PI))))
Outputs
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.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)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.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)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (* a (pow b 2)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (*.f64 y-scale y-scale)))) #s(literal -4 binary64))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (fma.f64 #s(literal 1/102036672000000 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/32400 binary64) (/.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 x-scale x-scale) (*.f64 y-scale y-scale))) (*.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 x-scale x-scale) (*.f64 y-scale y-scale)))))) (fma.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)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 (*.f64 b b) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal -1/765275040000000 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (fma.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.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 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (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 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 (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 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (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 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 (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 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (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 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 (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 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3))))) (pow x-scale 2)) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 a (fma.f64 a (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* a (+ (* a (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (pow x-scale 2)))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 a (fma.f64 a (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 a a))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow a 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 a a))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 a a)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) a)) a))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (pow x-scale 2)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (pow x-scale 2))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 a (*.f64 x-scale x-scale))))))) a)) a))))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2))))) (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2)))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2))))) (+ (* -1/196830000 (/ (* (pow (PI) 4) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (* (pow angle 2) (+ (* -4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 2)))))) (/ (* (pow (+ a b) 2) (* (+ (* 1/31886460000000 (pow (PI) 6)) (* 1/19131876000000 (pow (PI) 6))) (pow (- b a) 2))) (pow x-scale 2)))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.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)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/11957422500000 binary64))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a)))) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2)))
(fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale)))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3))))) (pow x-scale 2)) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 b (fma.f64 b (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (+ (* b (+ (* b (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (pow x-scale 2)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (pow x-scale 2)))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))))
(fma.f64 b (fma.f64 b (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 b b))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow b 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 b b))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 b (*.f64 b b))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (pow x-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) b)) b))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (pow x-scale 2)))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (pow x-scale 2)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (pow x-scale 2))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 b (*.f64 x-scale x-scale))))))) b)) b))))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (pow x-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 x-scale x-scale))
(* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))
(- (* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(- (* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(- (* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 a a) (fma.f64 (neg.f64 (*.f64 b b)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 a a) (fma.f64 (neg.f64 (*.f64 b b)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 a a) (fma.f64 (neg.f64 (*.f64 b b)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 a a) (fma.f64 (neg.f64 (*.f64 b b)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 a a) (fma.f64 (neg.f64 (*.f64 b b)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(* (pow a 2) (- (* -1 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (pow a 2))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 a a) (fma.f64 (neg.f64 (*.f64 b b)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 a a)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64))))
(* -1 (pow a 2))
(*.f64 a (neg.f64 a))
(- (* -1 (* (pow angle 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow a 2))
(neg.f64 (fma.f64 (*.f64 angle angle) (*.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)))) (*.f64 a a)))
(- (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4)))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow a 2))
(fma.f64 (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.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)))))) (*.f64 a (neg.f64 a)))
(- (* (pow angle 2) (- (* (pow angle 2) (- (* -1 (* (pow angle 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6)))))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4)))))) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))))) (pow a 2))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 angle angle) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))))) (neg.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)))))) (*.f64 a (neg.f64 a)))
(* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)))
(- (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(- (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(- (* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))
(fma.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 b b) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 b b)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 b b) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 b b)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 b b) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 b b)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(* -1 (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 b b) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 b b)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 b b) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 b b)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(* (pow b 2) (- (* -1 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow b 2))) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))))
(*.f64 (*.f64 b b) (neg.f64 (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 b b)) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))))
(/ (+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 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))) (/ (* (pow b 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (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)))))
(fma.f64 a (fma.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(+ (* -4 (/ (* (pow b 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* a (+ (* a (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (/ (* a (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b)))) (* (pow x-scale 2) (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)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (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)))))
(fma.f64 a (fma.f64 a (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) (fma.f64 a (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow a 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow a 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow b 2)) (* 2 (pow b 2)))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* (pow a 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 a a) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a (*.f64 a a))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(/ (* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (neg.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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)))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) a)) a))))
(* (pow a 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow b 3)) (* 2 (pow b 3)))) (* a (* (pow x-scale 2) (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))))) a)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 b) (* 2 b))) (* (pow x-scale 2) (pow y-scale 2)))) a)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 b b) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) a)) a))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow y-scale 2))) (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 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))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(+ (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (pow x-scale 2))) (pow y-scale 2))) (+ (* 1/8100 (/ (* (pow (PI) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 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)))) (* (pow angle 2) (+ (* -4 (/ (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (pow x-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (pow x-scale 2)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (pow x-scale 2)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (pow x-scale 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))))))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (/.f64 (fma.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)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a))))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (+.f64 b a)) (*.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)))) (fma.f64 #s(literal -4 binary64) (/.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -1/196830000 binary64) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale x-scale)) (*.f64 (*.f64 a a) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (pow x-scale 2))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 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))) (/ (* (pow a 4) (pow (sin (* 1/90 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (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)))))
(fma.f64 b (fma.f64 b (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(+ (* -4 (/ (* (pow a 4) (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* b (+ (* b (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (/ (* b (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a)))) (* (pow x-scale 2) (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)))))) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (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)))))
(fma.f64 b (fma.f64 b (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) (fma.f64 b (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (* (pow b 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -4 (pow a 2)) (* 2 (pow a 2)))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2)))) (+ (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* (pow b 3) (* (pow x-scale 2) (pow y-scale 2)))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2)))))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (*.f64 b b) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b (*.f64 b b))))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(/ (* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (pow x-scale 2))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale))) (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (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)))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))) b)) b))))
(* (pow b 4) (+ (* -4 (/ (* (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* -4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2)) (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (pow x-scale 2))) (pow y-scale 2))) (+ (* -1 (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 (pow a 3)) (* 2 (pow a 3)))) (* b (* (pow x-scale 2) (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))))) b)) (/ (* (pow (sin (* 1/90 (* angle (PI)))) 2) (+ (* -2 a) (* 2 a))) (* (pow x-scale 2) (pow y-scale 2)))) b)) (/ (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (-.f64 (/.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (/.f64 (fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale y-scale)) (-.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))))) b)) b))))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))))))) (* (pow (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2)))) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(/ (+ (* -4 (/ (* (+ (* (pow a 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 (sin (* 1/90 (* angle (PI)))) 2) (* (pow (+ a b) 2) (pow (- b a) 2))) (pow x-scale 2))) (pow y-scale 2))
(/.f64 (fma.f64 #s(literal -4 binary64) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64))) (*.f64 x-scale x-scale))) (*.f64 y-scale y-scale))
(* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale)
(+ (* -4 (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) x-scale) (/.f64 #s(literal 1/2 binary64) x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale)))
(+ (* -4 (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) x-scale) (/.f64 #s(literal 1/2 binary64) x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale)))
(+ (* -4 (* (pow a 2) (+ (* 1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) x-scale) (/.f64 #s(literal 1/2 binary64) x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale)))
(* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale)
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) x-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) x-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) x-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale)
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) x-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) x-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* (pow a 2) (+ (* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow a 2) x-scale))) (* -4 (/ (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) x-scale)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* -4 (/ (pow a 2) x-scale))
(*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale))
(+ (* -4 (* (pow angle 2) (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale))))) (* -4 (/ (pow a 2) x-scale)))
(*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) x-scale)) (/.f64 (*.f64 a a) x-scale)))
(+ (* -4 (/ (pow a 2) x-scale)) (* (pow angle 2) (+ (* -4 (* (pow angle 2) (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) x-scale)) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale))))) (* -4 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)))))))
(fma.f64 (*.f64 angle angle) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) x-scale)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)))
(+ (* -4 (/ (pow a 2) x-scale)) (* (pow angle 2) (+ (* -4 (+ (* -1/32400 (/ (* (pow a 2) (pow (PI) 2)) x-scale)) (* 1/32400 (/ (* (pow b 2) (pow (PI) 2)) x-scale)))) (* (pow angle 2) (+ (* -4 (* (pow angle 2) (+ (* -1/765275040000000 (/ (* (pow a 2) (pow (PI) 6)) x-scale)) (* 1/765275040000000 (/ (* (pow b 2) (pow (PI) 6)) x-scale))))) (* -4 (+ (* -1/3149280000 (/ (* (pow b 2) (pow (PI) 4)) x-scale)) (* 1/3149280000 (/ (* (pow a 2) (pow (PI) 4)) x-scale)))))))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) (/.f64 (*.f64 (PI.f64) (PI.f64)) x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/32400 binary64) (*.f64 b b)) (*.f64 (PI.f64) (PI.f64))) x-scale)) (*.f64 (*.f64 angle angle) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 (*.f64 a a) (/.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)) (pow.f64 (PI.f64) #s(literal 6 binary64))) x-scale)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 (*.f64 b b) (/.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) x-scale)) (/.f64 (*.f64 (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)) (pow.f64 (PI.f64) #s(literal 4 binary64))) x-scale)))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale)))
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale)
(+ (* -4 (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) x-scale) (/.f64 #s(literal 1/2 binary64) x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale)))
(+ (* -4 (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) x-scale) (/.f64 #s(literal 1/2 binary64) x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale)))
(+ (* -4 (* (pow b 2) (+ (* -1/2 (/ (cos (* 1/90 (* angle (PI)))) x-scale)) (* 1/2 (/ 1 x-scale))))) (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) x-scale)))
(*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (/.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) x-scale) (/.f64 #s(literal 1/2 binary64) x-scale)) (/.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale)))
(* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale)
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) x-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) x-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) x-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* -4 (/ (* (pow b 2) (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))) x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) x-scale)
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) x-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) x-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* (pow b 2) (+ (* -4 (/ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) x-scale))) (* -4 (/ (+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI)))))) x-scale))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) x-scale)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) x-scale))))
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(* -4 (/ (+ (* (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))
(/.f64 (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) x-scale)
(pow b 2)
(*.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)
(pow b 2)
(*.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)
(pow b 2)
(*.f64 b b)
(pow b 2)
(*.f64 b b)
(pow a 2)
(*.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)
(pow a 2)
(*.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)
(pow a 2)
(*.f64 a a)
(pow a 2)
(*.f64 a a)
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 b b) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(+ (* (pow b 2) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 b b) (fma.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale)))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale)))))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale)))))
(* (pow b 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (+ (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow b 2) (* x-scale y-scale))) (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow b 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 a a) (*.f64 b b)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (fma.f64 (pow.f64 a #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale)))))
(/ (* (pow a 2) (pow b 2)) (* x-scale y-scale))
(/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 x-scale y-scale))
(+ (* (pow angle 2) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale)))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 x-scale y-scale)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale))))) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 x-scale y-scale)))
(+ (* (pow angle 2) (+ (* (pow angle 2) (+ (* (pow angle 2) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* x-scale y-scale)))))) (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* x-scale y-scale)))))) (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* x-scale y-scale)) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* x-scale y-scale))))) (/ (* (pow a 2) (pow b 2)) (* x-scale y-scale)))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.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)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)))))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale y-scale)) (*.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)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.f64 x-scale y-scale)))))) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 a a)) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale))
(/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))
(+ (* (pow a 2) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 a a) (*.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(+ (* (pow a 2) (+ (/ (* (pow a 2) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale)) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* x-scale y-scale))))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale)))
(fma.f64 (*.f64 a a) (fma.f64 (*.f64 b b) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) y-scale)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale)))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) y-scale)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale)))))
(/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* x-scale y-scale))
(/.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) y-scale)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale y-scale)))))
(* (pow a 4) (+ (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* x-scale y-scale)) (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (+ (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow a 2) (* x-scale y-scale))) (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow a 4) (* x-scale y-scale)))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 (/.f64 (*.f64 b b) (*.f64 a a)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale y-scale))) (fma.f64 (pow.f64 b #s(literal 4 binary64)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 (pow.f64 a #s(literal 4 binary64)) x-scale) y-scale)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale 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)))))))) (+ (* (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 y-scale))
(/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 x-scale y-scale))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* (pow b 2) (+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow b 2) (* x-scale y-scale)))) (* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale)))))
(*.f64 (*.f64 b b) (fma.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 x-scale y-scale))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.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 x-scale y-scale))))))
(* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(+ (* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale)))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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) x-scale) y-scale)) (*.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 x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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) x-scale) y-scale)) (*.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 x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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) x-scale) y-scale)) (*.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 x-scale y-scale))))))
(* -2 (/ (* (pow a 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 (*.f64 a a) (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))))) (*.f64 x-scale y-scale))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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) x-scale) y-scale)) (*.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 x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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) x-scale) y-scale)) (*.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 x-scale y-scale))))))
(* (pow a 2) (+ (* -2 (/ (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI))))) (* x-scale y-scale))) (* 2 (/ (* (pow b 2) (* (cos (* 1/180 (* angle (PI)))) (sin (* 1/180 (* angle (PI)))))) (* (pow a 2) (* x-scale y-scale))))))
(*.f64 (*.f64 a a) (fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 b b) (cos.f64 (*.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) x-scale) y-scale)) (*.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 x-scale y-scale))))))
(* 1/90 (/ (* angle (* (PI) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1/90 binary64) (*.f64 (*.f64 angle (PI.f64)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 2 (* (pow angle 2) (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))
(*.f64 angle (fma.f64 (*.f64 #s(literal 2 binary64) (*.f64 angle angle)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/8748000 binary64)) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))) (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/8748000 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))))))
(* angle (+ (* 1/90 (/ (* (PI) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* (pow angle 2) (+ (* 2 (+ (* -1/11664000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/34992000 (/ (* (pow (PI) 3) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))) (* (pow angle 2) (+ (* 2 (* (pow angle 2) (+ (* -1/881596846080000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/1469328076800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* -1/4407984230400000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* -1/30855889612800000000 (/ (* (pow (PI) 7) (- (pow b 2) (pow a 2))) (* x-scale y-scale)))))))) (* 2 (+ (* 1/22674816000000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (+ (* 1/4534963200000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))) (* 1/2267481600000 (/ (* (pow (PI) 5) (- (pow b 2) (pow a 2))) (* x-scale y-scale))))))))))))
(*.f64 angle (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 2 binary64) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -1/881596846080000000 binary64) (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 7 binary64))) (*.f64 x-scale y-scale)) #s(literal -29/30855889612800000000 binary64))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 5 binary64))) (*.f64 x-scale y-scale)) #s(literal 1/1417176000000 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64)))) (*.f64 x-scale y-scale)) #s(literal -1/8748000 binary64)))) (*.f64 #s(literal 1/90 binary64) (*.f64 (PI.f64) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale y-scale))))))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* 2 (/ (* (cos (* 1/180 (* angle (PI)))) (* (sin (* 1/180 (* angle (PI)))) (- (pow b 2) (pow a 2)))) (* x-scale y-scale)))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64))))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 x-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
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 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64))) #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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/1574640000 binary64) (*.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64))) #s(literal 1 binary64))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(* 1/90 (* angle (PI)))
(*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))
(* angle (+ (* -1/4374000 (* (pow angle 2) (pow (PI) 3))) (* 1/90 (PI))))
(*.f64 angle (fma.f64 (*.f64 #s(literal -1/4374000 binary64) (*.f64 angle angle)) (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(* angle (+ (* 1/90 (PI)) (* (pow angle 2) (+ (* -1/4374000 (pow (PI) 3)) (* 1/708588000000 (* (pow angle 2) (pow (PI) 5)))))))
(*.f64 angle (fma.f64 (PI.f64) #s(literal 1/90 binary64) (*.f64 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal 1/708588000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 5 binary64)) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/4374000 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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 5 binary64)) #s(literal 1/708588000000 binary64) (*.f64 (*.f64 #s(literal -1/241061637600000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 7 binary64)))) (*.f64 (*.f64 (PI.f64) (*.f64 (PI.f64) (PI.f64))) #s(literal -1/4374000 binary64))) (*.f64 (PI.f64) #s(literal 1/90 binary64))))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(sin (* 1/90 (* angle (PI))))
(sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(* 1/32400 (* (pow angle 2) (pow (PI) 2)))
(*.f64 (*.f64 #s(literal 1/32400 binary64) (*.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 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64) (*.f64 (*.f64 #s(literal -1/3149280000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)))))
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* 1/765275040000000 (* (pow angle 2) (pow (PI) 6)))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64) (*.f64 (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64))))
(* (pow angle 2) (+ (* 1/32400 (pow (PI) 2)) (* (pow angle 2) (+ (* -1/3149280000 (pow (PI) 4)) (* (pow angle 2) (+ (* -1/347128758144000000000 (* (pow angle 2) (pow (PI) 8))) (* 1/765275040000000 (pow (PI) 6))))))))
(*.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 #s(literal -1/347128758144000000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 8 binary64)))) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal -1/3149280000 binary64))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal 1/32400 binary64))))
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(+ 1/2 (* -1/2 (cos (* 1/90 (* angle (PI))))))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))
(- (* 4 (/ (* (pow a 4) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))))
(- (+ (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3))))) (* (pow x-scale 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))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 b (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-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)))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 b (fma.f64 b (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (/.f64 (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-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)))) (* b (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* b (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* b (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow a 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 b (fma.f64 b (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (/.f64 (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow b 4) (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow b 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* (pow b 3) (* (pow x-scale 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))))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow b 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 b b) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 b (*.f64 b b)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 b b)))))))
(* (pow b 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow b 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* b (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (/ (- (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) b))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (/.f64 (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) b)) (neg.f64 b)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(* (pow b 4) (- (+ (* -1 (/ (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ a (* -1 a)))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1 (/ (- (+ (* -8 (/ (* (pow a 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow a 3)) (pow a 3)))) (* b (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (pow a 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) b))) b)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 b #s(literal 4 binary64)) (+.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)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.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)) #s(literal 0 binary64))) (*.f64 (*.f64 b (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (neg.f64 b))) (neg.f64 b)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-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)))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale)))))
(- (+ (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3))))) (* (pow x-scale 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))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(*.f64 #s(literal 4 binary64) (fma.f64 a (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-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)))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 a (fma.f64 a (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) (/.f64 (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-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)))) (* a (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* (pow x-scale 2) (pow y-scale 2)))) (* a (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* a (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b))))) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (/ (* (pow b 4) (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 a (fma.f64 a (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (/.f64 (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(literal 4 binary64) (*.f64 (/.f64 (pow.f64 b #s(literal 4 binary64)) (*.f64 x-scale x-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)) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 y-scale y-scale))))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow a 4) (- (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 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)))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (*.f64 #s(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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow a 2) (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 2) (pow y-scale 2))))) (+ (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* (pow a 3) (* (pow x-scale 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))))))) (+ (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (pow a 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))) (fma.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.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 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64)) (*.f64 (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)) (*.f64 a (*.f64 a a)))) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (*.f64 #s(literal -4 binary64) (fma.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))) (*.f64 a a)))))))
(* (pow a 4) (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
(* (pow a 4) (- (+ (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* a (* (pow x-scale 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))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 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)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.f64 (/.f64 (-.f64 (/.f64 (*.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)) #s(literal 0 binary64)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)))))) a)) (neg.f64 a)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(* (pow a 4) (- (+ (* -1 (/ (+ (* -1 (/ (- (+ (* -8 (/ (* (pow b 2) (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* -4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ (* -1 (pow b 3)) (pow b 3)))) (* a (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (pow b 2) (pow (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) 2)) (* (pow x-scale 2) (pow y-scale 2)))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (+ b (* -1 b)))) (* (pow x-scale 2) (pow y-scale 2))))) a)) (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (pow (sin (* 1/180 (* angle (PI)))) 2)) (* (pow x-scale 2) (pow y-scale 2))))) (* 4 (/ (* (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow x-scale 2) (pow y-scale 2))))))
(*.f64 (pow.f64 a #s(literal 4 binary64)) (+.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)) #s(literal 0 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.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)) (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) #s(literal 0 binary64))) (*.f64 (*.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (fma.f64 #s(literal -8 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))) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale x-scale)) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 y-scale y-scale))))))) (neg.f64 a))) (neg.f64 a)) (*.f64 #s(literal 4 binary64) (fma.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal -1/2 binary64)) (/.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.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))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 2) (- (+ (* 4 (+ (* -1/1049760000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (* -1/3149280000 (/ (* (pow (PI) 4) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* (pow angle 2) (- (* 4 (+ (* 1/102036672000000 (/ (* (pow (PI) 6) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))) (+ (* 1/32400 (/ (* (pow (PI) 2) (* (+ a b) (* (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4))) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (/ (* (+ a b) (* (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6))) (* (- b a) (- (pow b 2) (pow a 2))))) (* (pow x-scale 2) (pow y-scale 2)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 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))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/765275040000000 (* (pow b 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow a 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/765275040000000 (* (pow a 2) (pow (PI) 6))) (* 1/765275040000000 (* (pow b 2) (pow (PI) 6))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (+ (/ (* (pow a 2) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* 1/3149280000 (* (pow b 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* 1/3149280000 (* (pow a 2) (pow (PI) 4))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (*.f64 #s(literal 4 binary64) (-.f64 (fma.f64 #s(literal 1/32400 binary64) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (+.f64 b a) (/.f64 (*.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) #s(literal 1/765275040000000 binary64)) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal 1/102036672000000 binary64) (*.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 x-scale x-scale) (*.f64 y-scale y-scale))))))) (fma.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)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (+.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) #s(literal -1/787320000 binary64)) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 b b) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 a a) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 #s(literal -1/3149280000 binary64) (*.f64 a a) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a)))) (*.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))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))) (fma.f64 #s(literal 1/8100 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (+.f64 b a) (+.f64 b a))) (*.f64 (-.f64 b a) (-.f64 b a))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 b b) (/.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)))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (*.f64 a a) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 #s(literal -1/32400 binary64) (*.f64 b b) (*.f64 #s(literal 1/32400 binary64) (*.f64 a a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b)) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2)))))
(*.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 a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow a 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))))) (pow y-scale 2)))) (pow x-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))))) (*.f64 y-scale y-scale)))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (* (+ a b) (* (- b a) (- (pow b 2) (pow a 2)))))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (+ 1/2 (* 1/2 (cos (* 1/90 (* angle (PI))))))) (* (pow b 2) (- 1/2 (* 1/2 (cos (* 1/90 (* angle (PI)))))))) (+ (* (pow 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 y-scale 2))
(/.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 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale x-scale)) (*.f64 (fma.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 a a) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-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 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64) (*.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #s(literal 1 binary64))
(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))))
(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))))
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 (*.f64 angle angle) (fma.f64 (*.f64 (*.f64 angle angle) (pow.f64 (PI.f64) #s(literal 4 binary64))) #s(literal 1/25194240000 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/25194240000 binary64) (*.f64 (*.f64 #s(literal -1/24488801280000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/64800 binary64))) #s(literal 1 binary64))
(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))))
(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))))
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 (*.f64 angle angle) (fma.f64 (*.f64 #s(literal 1/1574640000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 4 binary64)) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64))) #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 (*.f64 angle angle) (fma.f64 (*.f64 angle angle) (fma.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/1574640000 binary64) (*.f64 (*.f64 #s(literal -1/382637520000000 binary64) (*.f64 angle angle)) (pow.f64 (PI.f64) #s(literal 6 binary64)))) (*.f64 (*.f64 (PI.f64) (PI.f64)) #s(literal -1/16200 binary64))) #s(literal 1 binary64))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))
(cos (* 1/90 (* angle (PI))))
(cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64)))

rewrite306.0ms (0.2%)

Memory
24.4MiB live, 619.6MiB allocated
Rules
4 318×lower-*.f32
4 236×lower-*.f64
2 926×lower-fma.f32
2 914×lower-fma.f64
2 850×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01331001
0226871
1840773
27653728
08110724
Stop Event
iter limit
node limit
iter limit
Counts
30 → 716
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 b #s(literal -4 binary64))
(*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale))
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64)))
(neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
(*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 a #s(literal 2 binary64))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))))
(/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 x-scale (*.f64 y-scale y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle)))
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(-.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 b #s(literal 2 binary64)) (pow.f64 a #s(literal 2 binary64)))) (sin.f64 (*.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 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64)))) (*.f64 x-scale y-scale)))) (*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 a (*.f64 a (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))))) x-scale) (/.f64 y-scale (fma.f64 b (*.f64 b (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))))) (*.f64 (*.f64 a a) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64)))))))))) (/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 4 binary64)) y-scale)))
(cos.f64 (*.f64 angle (*.f64 #s(literal 1/180 binary64) (PI.f64))))
(cos.f64 (*.f64 (/.f64 angle #s(literal 180 binary64)) (PI.f64)))
(cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (*.f64 angle #s(literal 1/180 binary64)) (PI.f64))))
Outputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (neg.f64 x-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(pow.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))) #s(literal -1 binary64))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 b (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 b #s(literal -4 binary64))))
(*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(*.f64 a (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 b a) (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) b)
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 b #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) b)
(/.f64 (*.f64 b a) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 b a) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 (*.f64 b a) (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 b a) (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a a) b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b a))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) b)
(*.f64 (*.f64 b a) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) a)
(*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (neg.f64 x-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(pow.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))) #s(literal -1 binary64))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 b (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 b #s(literal -4 binary64))))
(*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(*.f64 a (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 b a) (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) b)
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b a))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) a)
(*.f64 (*.f64 b b) (*.f64 a #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 a (*.f64 b #s(literal -4 binary64))) b)
(*.f64 (*.f64 a (*.f64 b b)) #s(literal -4 binary64))
(*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)
(*.f64 b (*.f64 b #s(literal -4 binary64)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 (*.f64 b #s(literal -4 binary64)) b)
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (neg.f64 x-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale (neg.f64 x-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(pow.f64 (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))) #s(literal -1 binary64))
(*.f64 b (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 b (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 b #s(literal -4 binary64))))
(*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(*.f64 a (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (*.f64 b a) (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) b)
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(*.f64 (*.f64 (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) #s(literal -4 binary64))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (neg.f64 x-scale))))
(/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))))))
(/.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (*.f64 x-scale (neg.f64 x-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) x-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) #s(literal 1 binary64)) (*.f64 x-scale x-scale))
(/.f64 (neg.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))) (neg.f64 (*.f64 x-scale (neg.f64 x-scale))))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale)) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale)
(pow.f64 (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a a) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale x-scale)))
(*.f64 (neg.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (neg.f64 x-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (/.f64 a x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))
(*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) a)
(*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale))
(*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) a)
(*.f64 (*.f64 a a) (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 (*.f64 b (*.f64 b (*.f64 a a))) #s(literal -4 binary64))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) a))
(*.f64 (*.f64 a (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 (*.f64 a a) (*.f64 b #s(literal -4 binary64))) b)
(+.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(+.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(-.f64 (/.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64)) (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))))
(fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(fma.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(fma.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal -4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(fma.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal -4 binary64) x-scale))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal -4 binary64) x-scale)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(fma.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (/.f64 #s(literal 4 binary64) x-scale) (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(fma.f64 #s(literal -1 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(fma.f64 (*.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal -4 binary64) x-scale)) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) x-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(fma.f64 (pow.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) #s(literal 2 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) x-scale) #s(literal 2 binary64)) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (exp.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) (exp.f64 (log.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) x-scale)) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale)) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.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 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(fma.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 4 binary64) x-scale) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))
(fma.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 6 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 6 binary64))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 6 binary64))) (+.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64)) (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64))) (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 6 binary64)))) (neg.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64)))) (neg.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64)) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))))
(*.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))))
(+.f64 #s(literal 0 binary64) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(+.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(+.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))))
(+.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(+.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) #s(literal -1 binary64)) (*.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(-.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))
(fma.f64 a (neg.f64 (*.f64 a (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(fma.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) #s(literal -1 binary64) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(fma.f64 (*.f64 a a) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(fma.f64 (*.f64 b b) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))))
(fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(fma.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))))
(fma.f64 (*.f64 b (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 b) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))))
(fma.f64 (neg.f64 a) (*.f64 a (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(fma.f64 (*.f64 a (neg.f64 a)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(fma.f64 (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 a a) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))
(fma.f64 (neg.f64 (*.f64 b b)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))))
(fma.f64 (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 b b) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))))
(fma.f64 (neg.f64 (*.f64 b (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) b (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))))
(neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64))) (neg.f64 (fma.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64))) (neg.f64 (-.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64))) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)))) (-.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) #s(literal 3 binary64)) (pow.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))) #s(literal 3 binary64))) (fma.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (-.f64 (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))) (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (fma.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 #s(literal 0 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a)))) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))))) (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (+.f64 #s(literal 0 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 #s(literal -1 binary64) (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64))))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))))
(*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))) (*.f64 y-scale y-scale)))
(/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) (*.f64 y-scale y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))))))
(/.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 6 binary64))) (*.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64))) (*.f64 (*.f64 y-scale y-scale) (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))))
(/.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) y-scale) y-scale)
(/.f64 (*.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 6 binary64))) #s(literal 1 binary64)) (*.f64 (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64))) #s(literal 1 binary64)) (*.f64 (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))))) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (neg.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) y-scale)) (neg.f64 y-scale))
(/.f64 (*.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (+.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 6 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (-.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale))))) (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64))))
(/.f64 (*.f64 (-.f64 (pow.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) #s(literal 2 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (-.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))))
(pow.f64 (/.f64 (*.f64 y-scale y-scale) (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) (*.f64 y-scale y-scale)))
(*.f64 (neg.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))))
(*.f64 (/.f64 (fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))) y-scale) (/.f64 #s(literal 1 binary64) y-scale))
(+.f64 (*.f64 (/.f64 #s(literal 4 binary64) x-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a)))) (*.f64 (/.f64 #s(literal 4 binary64) x-scale) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))))
(+.f64 (*.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (/.f64 #s(literal 4 binary64) x-scale)) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))) (/.f64 #s(literal 4 binary64) x-scale)))
(-.f64 #s(literal 0 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale #s(literal 1/4 binary64))))
(fma.f64 (/.f64 #s(literal 4 binary64) x-scale) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (*.f64 (/.f64 #s(literal 4 binary64) x-scale) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))))
(fma.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 a (neg.f64 a))) (/.f64 #s(literal 4 binary64) x-scale) (*.f64 (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b))) (/.f64 #s(literal 4 binary64) x-scale)))
(neg.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale #s(literal 1/4 binary64))))
(/.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale #s(literal 1/4 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64))) x-scale)
(/.f64 (neg.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)))) (neg.f64 x-scale))
(/.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal -4 binary64)) (neg.f64 x-scale))
(/.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (*.f64 x-scale #s(literal 1/4 binary64)))
(/.f64 (*.f64 #s(literal -4 binary64) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (neg.f64 x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 x-scale #s(literal 1/4 binary64)))
(*.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal -4 binary64) x-scale))
(*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 #s(literal 4 binary64) x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64))))
(*.f64 (/.f64 #s(literal 4 binary64) x-scale) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(*.f64 #s(literal -1 binary64) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale #s(literal 1/4 binary64))))
(*.f64 (neg.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) x-scale)) #s(literal 4 binary64))
(*.f64 (*.f64 (/.f64 #s(literal 4 binary64) x-scale) #s(literal -1 binary64)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 b)))
(pow.f64 b #s(literal 2 binary64))
(pow.f64 (*.f64 b b) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 b)) #s(literal 2 binary64))
(*.f64 b b)
(*.f64 (exp.f64 (log.f64 b)) (exp.f64 (log.f64 b)))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 a)))
(pow.f64 a #s(literal 2 binary64))
(pow.f64 (*.f64 a a) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 a)) #s(literal 2 binary64))
(*.f64 a a)
(*.f64 (exp.f64 (log.f64 a)) (exp.f64 (log.f64 a)))
(+.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))))
(+.f64 (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(+.f64 (*.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(fma.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(fma.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))))
(neg.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale) (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 x-scale)) (neg.f64 (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 x-scale)))
(/.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (neg.f64 (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))) (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 (*.f64 b (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64))) (*.f64 (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (-.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) #s(literal 1 binary64)) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale)) x-scale)
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)))) (*.f64 y-scale (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)))) (*.f64 y-scale (-.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (+.f64 (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 6 binary64)))) (fma.f64 (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (neg.f64 (*.f64 b b)))) (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64))))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (-.f64 (pow.f64 (*.f64 b (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)) (pow.f64 (*.f64 a (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 4 binary64)))) (-.f64 (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (neg.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale)) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) y-scale)
(/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) x-scale)
(pow.f64 (*.f64 (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (/.f64 x-scale (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) #s(literal -1 binary64))
(*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale)))
(*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale))
(*.f64 #s(literal 1 binary64) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 x-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (neg.f64 y-scale)))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))
(*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) #s(literal 1 binary64)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale))
(*.f64 (/.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (neg.f64 y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(neg.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (neg.f64 y-scale)))
(neg.f64 (/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) y-scale))
(/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (/.f64 (*.f64 x-scale y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) y-scale)
(/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))))))
(/.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (+.f64 b a)) (neg.f64 (-.f64 b a))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a)))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (+.f64 b a)) (neg.f64 (-.f64 b a))) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) #s(literal 1 binary64)) y-scale)
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) #s(literal 1 binary64)) (/.f64 (*.f64 x-scale y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (/.f64 (*.f64 x-scale y-scale) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (+.f64 b a)) (neg.f64 (-.f64 b a))) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale))
(/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) y-scale) x-scale)
(pow.f64 (*.f64 y-scale (/.f64 x-scale (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))))) #s(literal -1 binary64))
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))))
(*.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))))
(*.f64 (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))))
(*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))
(*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) y-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) y-scale) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) x-scale))
(*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) x-scale))
(*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) x-scale) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) y-scale))
(*.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) x-scale) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) y-scale))
(*.f64 (/.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) x-scale))
(*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))
(*.f64 (*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 #s(literal 2 binary64) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))) (*.f64 (+.f64 b a) (-.f64 b a)))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 (*.f64 y-scale y-scale) x-scale)
(*.f64 (*.f64 x-scale y-scale) y-scale)
(neg.f64 (/.f64 a (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(neg.f64 (/.f64 (neg.f64 a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 a x-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a)))
(/.f64 (neg.f64 a) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 a x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (/.f64 a x-scale) x-scale) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 y-scale y-scale)) x-scale)
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (neg.f64 a) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(/.f64 a (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a a)))
(/.f64 (*.f64 a (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a a) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a a) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a #s(literal 1 binary64)) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 a (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) a))
(/.f64 (*.f64 (/.f64 a x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))
(cos.f64 (fma.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (-.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))
(*.f64 #s(literal 2 binary64) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) #s(literal 2 binary64)))
(-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(-.f64 (/.f64 #s(literal 1/8 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))) (/.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 3 binary64)) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(-.f64 (/.f64 #s(literal 1/4 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 1/2 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/4 binary64))) (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal -1/2 binary64)) (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/4 binary64))))
(/.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (+.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/4 binary64)))))
(/.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)))
(/.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal -1/4 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/2 binary64) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 2 binary64))
(/.f64 (neg.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64))) (neg.f64 (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/4 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))))) (neg.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal -1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 2 binary64))
(*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))
(*.f64 (fma.f64 (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal -1/8 binary64) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/4 binary64)))))
(*.f64 (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal -1/2 binary64))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) (pow.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))))) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/4 binary64)))
(+.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(+.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))) (/.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(fma.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 #s(literal 4 binary64) (neg.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (pow.f64 (/.f64 #s(literal 1 binary64) y-scale) #s(literal 2 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (neg.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale))) (/.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #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 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 #s(literal -1 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 x-scale y-scale)) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) y-scale) (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (neg.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale))) (*.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (neg.f64 (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 y-scale y-scale))) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (*.f64 (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) (/.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 x-scale y-scale))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64)))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (/.f64 (*.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (+.f64 b a) (*.f64 (-.f64 b a) #s(literal 2 binary64))))) (*.f64 x-scale y-scale)) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 1 binary64) x-scale)) (/.f64 #s(literal 4 binary64) y-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(fma.f64 (*.f64 (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale)) #s(literal -4 binary64)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale))) (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))) (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale))))
(/.f64 (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) y-scale) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale #s(literal 1/4 binary64))))) y-scale)
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) y-scale) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 y-scale (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 4 binary64)) (*.f64 x-scale x-scale)))) (*.f64 y-scale (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) y-scale) (/.f64 y-scale (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))))) (*.f64 y-scale (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale (*.f64 x-scale #s(literal 1/4 binary64))))))) (/.f64 (*.f64 y-scale y-scale) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) y-scale) (*.f64 (*.f64 y-scale y-scale) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale #s(literal 1/4 binary64)))))) (*.f64 (*.f64 y-scale y-scale) y-scale))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) y-scale) y-scale) (*.f64 y-scale (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale #s(literal 1/4 binary64)))))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64))))) (neg.f64 (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64)))) (neg.f64 (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 6 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)))))
(*.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 4 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 4 binary64) (/.f64 (*.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (*.f64 b b) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) (*.f64 (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)) (*.f64 (+.f64 b a) (/.f64 (-.f64 b a) x-scale)))) (*.f64 y-scale y-scale)))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(+.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))
(cos.f64 (fma.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)) (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))))
(-.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/4 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/4 binary64)))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/8 binary64) (pow.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 3 binary64)) #s(literal 1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal 1/4 binary64)) (*.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/4 binary64)))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (fma.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (/.f64 #s(literal 1 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) #s(literal 1 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (+.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1 binary64)) #s(literal 1/2 binary64) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) #s(literal 3 binary64)))) (fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/4 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (neg.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))
(fma.f64 (/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64))))))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))))) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (*.f64 (neg.f64 (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))
(/.f64 (-.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (fma.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (*.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64)) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal 1/2 binary64))) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) #s(literal 1 binary64))
(*.f64 (+.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))) (-.f64 (cos.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64)))) (sin.f64 (*.f64 angle (*.f64 (PI.f64) #s(literal 1/180 binary64))))))

eval766.0ms (0.5%)

Memory
-304.5MiB live, 1 110.6MiB allocated
Compiler

Compiled 166 291 to 5 012 computations (97% saved)

prune33.0s (22%)

Memory
59.0MiB live, 91 965.3MiB allocated
Pruning

30 alts after pruning (30 fresh and 0 done)

PrunedKeptTotal
New2 148242 172
Fresh13619
Picked505
Done000
Total2 166302 196
Accuracy
93.3%
Counts
2 196 → 30
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.4%
(fma.f64 (/.f64 #s(literal 4 binary64) (*.f64 x-scale y-scale)) (*.f64 (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale y-scale)) (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))))) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
24.3%
(fma.f64 (*.f64 (*.f64 #s(literal -4 binary64) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) (*.f64 x-scale x-scale))) (/.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b))) y-scale)) (/.f64 #s(literal 1 binary64) y-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
22.3%
(/.f64 (fma.f64 (*.f64 (neg.f64 (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64)) (*.f64 (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)) (*.f64 b b)))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))))))) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal -1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 angle #s(literal 1/90 binary64)))) #s(literal -1/2 binary64) #s(literal -1/2 binary64)))))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
22.6%
(/.f64 (fma.f64 (*.f64 #s(approx (neg (+ (* (* a a) (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2)) (* (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2) (* b b)))) (*.f64 a (neg.f64 a))) (/.f64 #s(literal 4 binary64) x-scale)) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
22.2%
(/.f64 (fma.f64 #s(approx (* (neg (+ (* (* a a) (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2)) (* (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2) (* b b)))) (/ 4 x-scale)) (*.f64 #s(literal -4 binary64) (fma.f64 (*.f64 a a) (fma.f64 #s(literal 1/2 binary64) (/.f64 (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) x-scale) (/.f64 #s(literal 1/2 binary64) x-scale)) (/.f64 (*.f64 (*.f64 b b) (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64))) x-scale)))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
22.6%
(/.f64 (fma.f64 #s(approx (* (neg (+ (* (* a a) (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2)) (* (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2) (* b b)))) (/ 4 x-scale)) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) x-scale))) (/.f64 (fma.f64 b (*.f64 b (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal 1/2 binary64))) (*.f64 (*.f64 a a) (fma.f64 (cos.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) #s(literal -1/2 binary64) #s(literal 1/2 binary64)))) x-scale) (pow.f64 (/.f64 (*.f64 (sin.f64 (*.f64 (PI.f64) (*.f64 #s(literal 1/90 binary64) angle))) (*.f64 (+.f64 b a) (-.f64 b a))) x-scale) #s(literal 2 binary64))) (*.f64 y-scale y-scale))
29.8%
(/.f64 #s(approx (+ (* (* (neg (+ (* (* a a) (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2)) (* (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2) (* b b)))) (/ 4 x-scale)) (/ (+ (* b (* b (+ (* 1/2 (cos (* (PI) (* 1/90 angle)))) 1/2))) (* (* a a) (+ (* (cos (* (PI) (* 1/90 angle))) -1/2) 1/2))) x-scale)) (pow (/ (* (sin (* (PI) (* 1/90 angle))) (* (+ b a) (- b a))) x-scale) 2)) (fma.f64 b (fma.f64 b (fma.f64 #s(literal -4 binary64) (*.f64 (*.f64 a a) (+.f64 (/.f64 (pow.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)) (/.f64 (pow.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) #s(literal 2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 a a) #s(literal -2 binary64)) (*.f64 x-scale x-scale)))) (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (*.f64 x-scale x-scale)))) (fma.f64 #s(literal -4 binary64) (*.f64 (pow.f64 a #s(literal 4 binary64)) (*.f64 (fma.f64 #s(literal -1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (/.f64 (fma.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 1/2 binary64)) (*.f64 x-scale x-scale)))) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 (*.f64 angle (PI.f64)) #s(literal 1/90 binary64))) #s(literal 2 binary64)) (pow.f64 a #s(literal 4 binary64))) (*.f64 x-scale x-scale))))) (*.f64 y-scale y-scale))
64.0%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) x-scale) (*.f64 y-scale y-scale)))
64.9%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) x-scale)) (*.f64 x-scale y-scale)) y-scale))
64.6%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
66.4%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) y-scale))
56.0%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (/.f64 (*.f64 a a) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) x-scale)) (*.f64 y-scale y-scale)))
66.1%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (/.f64 a x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 y-scale y-scale))))
59.2%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale)))) x-scale))
63.5%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 b b)) (*.f64 a a)) (*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))))
61.5%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale (/.f64 x-scale (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))))))))
77.5%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)))
69.1%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 (*.f64 b a) a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
66.4%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (*.f64 a (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))) (*.f64 y-scale (*.f64 x-scale x-scale))) (/.f64 #s(literal 1 binary64) y-scale)))
69.0%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (*.f64 x-scale x-scale)) y-scale)))
63.0%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 #s(literal -4 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 b (*.f64 b (*.f64 a a))) x-scale)))
73.3%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b a) (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))))
74.2%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 (*.f64 b a) (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))))
69.1%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
73.5%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) a)))
67.7%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale))))))
85.1%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))))
79.4%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))))))
59.3%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b #s(approx (* a (/ a (* x-scale (* x-scale (* y-scale y-scale))))) (/.f64 (*.f64 a a) (*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale)))))))
71.3%
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))))
Compiler

Compiled 2 354 to 1 218 computations (48.3% saved)

simplify191.0ms (0.1%)

Memory
-10.1MiB live, 428.4MiB allocated
Algorithm
egg-herbie
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)))
cost-diff384
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)
cost-diff384
(/.f64 (/.f64 a x-scale) y-scale)
cost-diff384
(*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))
cost-diff0
(*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b))
cost-diff0
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
cost-diff384
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
cost-diff0
(*.f64 b #s(literal -4 binary64))
cost-diff0
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
cost-diff320
(*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
cost-diff0
(*.f64 #s(literal -4 binary64) (*.f64 b b))
cost-diff0
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
cost-diff0
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))))
cost-diff0
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))
cost-diff0
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))))
cost-diff384
(/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale))
cost-diff384
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)
Rules
8 108×lower-*.f32
8 064×lower-*.f64
3 102×lower-/.f32
3 082×lower-/.f64
1 968×lower-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
080974
0114968
1253968
2806958
34619958
47433958
08318953
Stop Event
iter limit
node limit
iter limit
Calls
Call 1
Inputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))
(*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))
a
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale))
(/.f64 a x-scale)
x-scale
(*.f64 x-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
a
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
(/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))
(*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))
x-scale
(*.f64 (*.f64 x-scale y-scale) y-scale)
(*.f64 x-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 b a) a)
(*.f64 b a)
a
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
#s(literal 1 binary64)
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale))
(*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b))
a
(*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)
(*.f64 (*.f64 a #s(literal -4 binary64)) b)
(*.f64 a #s(literal -4 binary64))
#s(literal -4 binary64)
b
(*.f64 x-scale x-scale)
x-scale
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)))
(*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 a x-scale)
a
x-scale
y-scale
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
#s(literal -4 binary64)
(*.f64 b b)
b
Outputs
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 a a) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
a
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 a x-scale)
x-scale
(*.f64 x-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64))))
a
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
#s(literal -4 binary64)
(*.f64 b b)
b
(/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))
(/.f64 a (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 (*.f64 x-scale y-scale) y-scale)
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 x-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 b #s(literal -4 binary64))
b
#s(literal -4 binary64)
(*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (*.f64 b a) a)
(*.f64 b (*.f64 a a))
(*.f64 b a)
a
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
#s(literal 1 binary64)
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
x-scale
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 x-scale x-scale))
(*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a))))
a
(*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)
(*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64))))
(*.f64 (*.f64 a #s(literal -4 binary64)) b)
(*.f64 b (*.f64 a #s(literal -4 binary64)))
(*.f64 a #s(literal -4 binary64))
#s(literal -4 binary64)
b
(*.f64 x-scale x-scale)
x-scale
(*.f64 y-scale y-scale)
y-scale
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))))
(*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 b (*.f64 a a)))) (*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 a x-scale)
a
x-scale
y-scale
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)
(/.f64 (*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64)))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)
(*.f64 a (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 b (*.f64 b (*.f64 a #s(literal -4 binary64))))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
#s(literal -4 binary64)
(*.f64 b b)
b

localize356.0ms (0.2%)

Memory
-3.6MiB live, 911.0MiB allocated
Localize:

Found 20 expressions of interest:

NewMetricScoreProgram
accuracy4.171812391855961
(/.f64 (/.f64 a x-scale) y-scale)
accuracy4.3259865783365985
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)
accuracy5.0322696202234996
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)
accuracy8.719177472455305
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy0.13671875
(*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)
accuracy2.8517946400794685
(*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b))
accuracy11.39404606357192
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale))
accuracy14.942968633037196
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
accuracy2.4310086375600184
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
accuracy2.6583923130968254
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
accuracy8.114277086578085
(*.f64 x-scale (*.f64 y-scale y-scale))
accuracy13.002993359076367
(*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
accuracy2.4310086375600184
(*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))
accuracy4.944927179967277
(/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))
accuracy8.719177472455305
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
accuracy9.43461231674744
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))
accuracy2.7044686114192844
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)
accuracy2.7927751746634057
(/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale))
accuracy3.589788927630937
(*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))
accuracy3.8194091853012675
(*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))
Samples
165.0ms124×1valid
52.0ms103×0valid
51.0ms29×2valid
Compiler

Compiled 884 to 77 computations (91.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 219.0ms
ival-mult: 61.0ms (27.8% of total)
ival-sin: 42.0ms (19.2% of total)
ival-div: 34.0ms (15.5% of total)
ival-cos: 33.0ms (15.1% of total)
ival-pow2: 22.0ms (10% of total)
adjust: 14.0ms (6.4% of total)
ival-sub: 6.0ms (2.7% of total)
ival-add: 5.0ms (2.3% of total)
ival-pi: 2.0ms (0.9% of total)
exact: 1.0ms (0.5% of total)
ival-assert: 0.0ms (0% of total)
ival-true: 0.0ms (0% of total)

series130.0ms (0.1%)

Memory
25.7MiB live, 389.3MiB allocated
Counts
28 → 1 104
Calls
Call 1
Inputs
#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())
#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())
#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())
#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())
#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())
#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())
#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())
#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())
#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())
#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())
#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())
#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())
Outputs
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) (patch (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) (patch (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) (patch (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (patch (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor 0 b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (pow b 2)) (taylor -inf b) (#s(alt (*.f64 #s(literal -4 binary64) (*.f64 b b)) (patch (*.f64 #s(literal -4 binary64) (*.f64 b b)) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (patch (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (patch (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor 0 b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 b) (taylor -inf b) (#s(alt (*.f64 b #s(literal -4 binary64)) (patch (*.f64 b #s(literal -4 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) (patch (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (patch (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf a) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor 0 b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor inf b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (* (pow a 2) (pow b 2))) (taylor -inf b) (#s(alt (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (patch (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf a) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf x-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf y-scale) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor inf b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor -inf b) (#s(alt (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) (patch (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf a) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (/ a (* x-scale y-scale)) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 a x-scale) y-scale) (patch (/.f64 (/.f64 a x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf a) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf b) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf x-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor 0 y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) (* x-scale y-scale))) (taylor -inf y-scale) (#s(alt (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) (patch (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf b) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor 0 a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))))))) (taylor -inf a) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))) (taylor 0 angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2))))) (taylor -inf angle) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor 0 x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2)) (taylor -inf x-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) (patch #s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf b) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) (patch (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) (patch (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf a) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf x-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor 0 y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (/ a (* (pow x-scale 2) (pow y-scale 2))) (taylor -inf y-scale) (#s(alt (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) (patch (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) (patch (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* x-scale (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 y-scale y-scale)) (patch (*.f64 x-scale (*.f64 y-scale y-scale)) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf x-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor 0 y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* (pow x-scale 2) (pow y-scale 2)) (taylor -inf y-scale) (#s(alt (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (patch (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf a) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor 0 b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor inf b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (* a (pow b 2))) (taylor -inf b) (#s(alt (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) (patch (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf a) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf b) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor 0 x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
#s(alt (* -4 (/ (* a (pow b 2)) x-scale)) (taylor -inf x-scale) (#s(alt (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) (patch (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) #<representation binary64>) () ())) ())
Calls

276 calls:

TimeVariablePointExpression
2.0ms
y-scale
@-inf
(/ (/ (* a (* -4 (* b b))) x-scale) y-scale)
1.0ms
x-scale
@0
(/ (/ (* a (* -4 (* b b))) x-scale) y-scale)
1.0ms
y-scale
@0
(/ (/ (* a (* -4 (* b b))) x-scale) y-scale)
1.0ms
a
@inf
(/ (/ a x-scale) (* x-scale y-scale))
1.0ms
b
@inf
(/ (* a (* -4 (* b b))) x-scale)

simplify435.0ms (0.3%)

Memory
27.3MiB live, 1 010.0MiB allocated
Algorithm
egg-herbie
Rules
12 504×lower-fma.f64
12 504×lower-fma.f32
7 588×lower-*.f64
7 588×lower-*.f32
4 684×lower-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
021338628
177636778
2365335708
0819835068
Stop Event
iter limit
node limit
Counts
1 104 → 1 104
Calls
Call 1
Inputs
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(/ a (* (pow x-scale 2) y-scale))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(* -4 (pow b 2))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 b)
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (* (pow a 2) (pow b 2)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(/ a (* x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 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)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* x-scale (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* (pow x-scale 2) (pow y-scale 2))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (* a (pow b 2)))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
(* -4 (/ (* a (pow b 2)) x-scale))
Outputs
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/ a (* (pow x-scale 2) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(* -4 (pow b 2))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 b)
(*.f64 b #s(literal -4 binary64))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (/ (* (pow a 2) (pow b 2)) (pow x-scale 2)))
(*.f64 (*.f64 a (*.f64 a (*.f64 b b))) (/.f64 #s(literal -4 binary64) (*.f64 x-scale x-scale)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (* (pow a 2) (pow b 2)))
(*.f64 (*.f64 b b) (*.f64 (*.f64 a a) #s(literal -4 binary64)))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/ a (* x-scale y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* -4 (/ (* a (pow b 2)) (* x-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64))) (*.f64 x-scale y-scale))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow a 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow a 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 b b) (fma.f64 (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 a 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* (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)))) (* 4 (+ (/ (* (pow b 2) (pow (cos (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (pow (sin (* 1/180 (* angle (PI)))) 4)) (* (pow x-scale 2) (pow y-scale 2)))))))
(*.f64 (*.f64 a a) (fma.f64 (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 4 binary64)))) #s(literal -4 binary64) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 b 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 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))
(* -4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2))))
(*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(- (* (pow angle 2) (- (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 a a) (*.f64 (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -4 binary64)) (*.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (-.f64 (/.f64 (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) #s(literal -1/787320000 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(- (* (pow angle 2) (- (+ (* 1/8100 (/ (* (pow (PI) 2) (pow (- (pow b 2) (pow a 2)) 2)) (* (pow x-scale 2) (pow y-scale 2)))) (* (pow angle 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 angle 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)))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/3149280000 (* (pow a 2) (pow (PI) 4))) (* (pow b 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 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 a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* (pow a 2) (+ (* -1/816293376000000 (pow (PI) 6)) (* -1/12244400640000000 (pow (PI) 6)))) (* (pow b 2) (+ (* 1/2040733440000000 (pow (PI) 6)) (* 1/1224440064000000 (pow (PI) 6)))))) (* (pow x-scale 2) (pow y-scale 2)))))))))) (* 4 (+ (/ (* (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2)))) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (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 x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/3149280000 (* (pow b 2) (pow (PI) 4))) (* (pow a 2) (+ (* 1/12597120000 (pow (PI) 4)) (* 1/4199040000 (pow (PI) 4)))))) (* (pow x-scale 2) (pow y-scale 2))))))))) (* 4 (+ (/ (* (pow a 2) (+ (* -1/32400 (* (pow b 2) (pow (PI) 2))) (* 1/32400 (* (pow a 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))) (/ (* (pow b 2) (+ (* -1/32400 (* (pow a 2) (pow (PI) 2))) (* 1/32400 (* (pow b 2) (pow (PI) 2))))) (* (pow x-scale 2) (pow y-scale 2))))))) (* 4 (/ (* (pow a 2) (pow b 2)) (* (pow x-scale 2) (pow y-scale 2)))))
(fma.f64 (*.f64 angle angle) (fma.f64 #s(literal -4 binary64) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (*.f64 (*.f64 b b) (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (fma.f64 (*.f64 angle angle) (fma.f64 #s(literal 4 binary64) (fma.f64 (fma.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) #s(literal 1/102036672000000 binary64) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (/.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))) (fma.f64 #s(literal 1/32400 binary64) (*.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) #s(literal 1/3149280000 binary64)))) (/.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (neg.f64 (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal 1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal -1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 6 binary64)) (fma.f64 #s(literal -1/765275040000000 binary64) (*.f64 a a) (*.f64 #s(literal 1/765275040000000 binary64) (*.f64 b b)))) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))))) (*.f64 angle angle) (neg.f64 (fma.f64 (*.f64 b b) (/.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 b b) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 a a)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (fma.f64 (*.f64 (pow.f64 (PI.f64) #s(literal 4 binary64)) (fma.f64 (*.f64 a a) #s(literal -1/3149280000 binary64) (*.f64 #s(literal 1/3149280000 binary64) (*.f64 b b)))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 b b) #s(literal -1/32400 binary64) (*.f64 (*.f64 a a) #s(literal 1/32400 binary64)))) (/.f64 (*.f64 (*.f64 (PI.f64) (PI.f64)) (fma.f64 (*.f64 a a) #s(literal -1/32400 binary64) (*.f64 (*.f64 b b) #s(literal 1/32400 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))))) (*.f64 (/.f64 (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (pow.f64 (PI.f64) #s(literal 4 binary64)))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1/196830000 binary64))) (/.f64 (*.f64 #s(literal 1/8100 binary64) (*.f64 (*.f64 (PI.f64) (PI.f64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a))))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))) (*.f64 (*.f64 (*.f64 a a) #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (* (pow x-scale 2) (pow y-scale 2)))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (* (pow x-scale 2) (pow y-scale 2)))))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow y-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow y-scale 2)))) (pow x-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (- (* 4 (/ (* (pow (cos (* 1/180 (* angle (PI)))) 2) (* (pow (sin (* 1/180 (* angle (PI)))) 2) (pow (- (pow b 2) (pow a 2)) 2))) (pow x-scale 2))) (* 4 (/ (* (+ (* (pow a 2) (pow (cos (* 1/180 (* 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)))) (pow x-scale 2)))) (pow y-scale 2))
(/.f64 (*.f64 #s(literal 4 binary64) (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)) (*.f64 (*.f64 (+.f64 b a) (-.f64 b a)) (*.f64 (+.f64 b a) (-.f64 b a)))) (*.f64 y-scale y-scale))) (*.f64 (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 a a) (pow.f64 (cos.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (/.f64 (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 a a) (pow.f64 (sin.f64 (*.f64 #s(literal 1/180 binary64) (*.f64 angle (PI.f64)))) #s(literal 2 binary64)))) (*.f64 y-scale y-scale))))) (*.f64 x-scale x-scale))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (* (pow a 2) b) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 b (*.f64 a a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ (pow a 2) (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/ a (* (pow x-scale 2) (pow y-scale 2)))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* x-scale (pow y-scale 2))
(*.f64 x-scale (*.f64 y-scale y-scale))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* (pow x-scale 2) (pow y-scale 2))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (* a (pow b 2)))
(*.f64 a (*.f64 (*.f64 b b) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))
(* -4 (/ (* a (pow b 2)) x-scale))
(*.f64 a (*.f64 (/.f64 (*.f64 b b) x-scale) #s(literal -4 binary64)))

rewrite262.0ms (0.2%)

Memory
-1.1MiB live, 600.8MiB allocated
Rules
4 728×lower-*.f32
4 684×lower-*.f64
3 392×lower-fma.f64
3 392×lower-fma.f32
3 116×lower-/.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
080876
0114740
1466672
23426637
08378632
Stop Event
iter limit
node limit
iter limit
Counts
28 → 1 279
Calls
Call 1
Inputs
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)
(/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale))
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) (/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b)))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 (*.f64 (*.f64 b a) a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 b #s(literal -4 binary64))
(/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)) (*.f64 x-scale x-scale))
(*.f64 a (*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b))
(*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale))
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)
#s(approx (- (* (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale) (/ (/ (* (* (* 2 (- (pow b 2) (pow a 2))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (*.f64 (/.f64 (/.f64 a x-scale) y-scale) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale) y-scale)))
(*.f64 b (*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale)))
(*.f64 a (/.f64 (/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale)) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale)))
(*.f64 x-scale (*.f64 (*.f64 x-scale y-scale) y-scale))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (*.f64 a #s(literal -4 binary64)) b) b)
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 b b))) x-scale)
Outputs
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a))) #s(literal -1 binary64)))
(exp.f64 (+.f64 (log.f64 a) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64) (log.f64 a)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 a (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (/.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (/.f64 a x-scale) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (/.f64 (/.f64 a x-scale) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 a (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(neg.f64 (/.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)))
(neg.f64 (/.f64 (neg.f64 a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(neg.f64 (/.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 a x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 a x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)) #s(literal 1 binary64)))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 a) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (/.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 a #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) y-scale)
(/.f64 (*.f64 a (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 y-scale y-scale)) x-scale)
(pow.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))) y-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 a x-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 #s(literal 1 binary64) a) #s(literal -1 binary64)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 a) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) a) #s(literal -1 binary64)))
(*.f64 (*.f64 a #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 y-scale (neg.f64 (/.f64 a x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 x-scale y-scale) (neg.f64 x-scale))) (/.f64 a (*.f64 (*.f64 x-scale y-scale) (neg.f64 x-scale))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))
(neg.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (/.f64 a x-scale) (*.f64 x-scale y-scale))
(/.f64 (/.f64 a x-scale) (neg.f64 (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale a) (*.f64 x-scale y-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) a))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 a (*.f64 x-scale x-scale))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) x-scale)
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a)))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (neg.f64 a) (*.f64 (*.f64 x-scale y-scale) (neg.f64 x-scale)))
(/.f64 (neg.f64 a) (neg.f64 (*.f64 x-scale (*.f64 x-scale y-scale))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 x-scale a))
(/.f64 (/.f64 a (*.f64 x-scale x-scale)) y-scale)
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (neg.f64 (/.f64 a (*.f64 x-scale x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (neg.f64 a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale))) (neg.f64 x-scale))
(pow.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale a) (*.f64 x-scale y-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) a) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 a (*.f64 x-scale x-scale))) #s(literal -1 binary64))
(*.f64 a (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale y-scale)))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) x-scale)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (neg.f64 (/.f64 a x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) (/.f64 a x-scale))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale (/.f64 #s(literal 1 binary64) x-scale)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 x-scale y-scale) (neg.f64 a)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a x-scale) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) a) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 y-scale))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(pow.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b)
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) x-scale) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 b x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 b y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 y-scale y-scale)) (/.f64 b (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) (*.f64 #s(literal -4 binary64) (*.f64 a b)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 a b))) b)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a x-scale) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) a) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 y-scale))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(pow.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b)
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) x-scale) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 b x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 b y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 y-scale y-scale)) (/.f64 b (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) (*.f64 #s(literal -4 binary64) (*.f64 a b)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 a b))) b)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 a (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a b)))
(*.f64 (*.f64 b b) (*.f64 a #s(literal -4 binary64)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a b))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) a)
(*.f64 (*.f64 a b) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) b)
(*.f64 (*.f64 a (*.f64 b b)) #s(literal -4 binary64))
(*.f64 b (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 b b) #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) (*.f64 b b))
(*.f64 (*.f64 b #s(literal -4 binary64)) b)
(/.f64 (*.f64 a b) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a b))))
(/.f64 (neg.f64 (*.f64 a (*.f64 a b))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 a b)) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 a b) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (*.f64 a b) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (*.f64 (*.f64 a b) (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a b) (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a b) (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 a b)) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (*.f64 a b)) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) b) y-scale)
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 a b))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a b))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b))
(*.f64 a (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 a (*.f64 (*.f64 a b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 a (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a b) y-scale))
(*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b)
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a b))
(*.f64 (*.f64 a b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 a b)))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 a b) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a b) x-scale))
(*.f64 (/.f64 (*.f64 a b) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 a b) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) a)
(*.f64 (*.f64 (*.f64 a b) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) (*.f64 a a))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a b)) a)
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a x-scale) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) a) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 y-scale))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(pow.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b)
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) x-scale) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 b x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 b y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 y-scale y-scale)) (/.f64 b (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) (*.f64 #s(literal -4 binary64) (*.f64 a b)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 a b))) b)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 b #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) b)
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a x-scale) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) a) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 y-scale))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(pow.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b)
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) x-scale) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 b x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 b y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 y-scale y-scale)) (/.f64 b (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) (*.f64 #s(literal -4 binary64) (*.f64 a b)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 a b))) b)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale x-scale))) (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)))
(neg.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)))
(/.f64 (/.f64 a x-scale) (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 x-scale a))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) x-scale)
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (*.f64 (neg.f64 x-scale) (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (/.f64 x-scale a) x-scale))
(/.f64 (*.f64 (neg.f64 a) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (neg.f64 x-scale))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 (/.f64 a x-scale) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (neg.f64 x-scale))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 (/.f64 x-scale a) (neg.f64 x-scale)))
(/.f64 (*.f64 (neg.f64 a) (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale x-scale))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a))) (neg.f64 (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (neg.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (neg.f64 x-scale))
(pow.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 x-scale (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a x-scale))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (/.f64 b (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 b (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))))
(*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) a)
(*.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) x-scale) (/.f64 b x-scale))
(*.f64 (*.f64 (/.f64 a x-scale) a) (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale))
(*.f64 (pow.f64 (/.f64 x-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b)))) #s(literal -1 binary64)) (pow.f64 (/.f64 x-scale b) #s(literal -1 binary64)))
(*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 b (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))))
(*.f64 (*.f64 a a) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 #s(literal -4 binary64) (*.f64 b (*.f64 a (*.f64 a b))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (*.f64 a a))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) a)
(*.f64 (*.f64 a b) (*.f64 #s(literal -4 binary64) (*.f64 a b)))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) a))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (*.f64 a b))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) b)
(*.f64 (*.f64 a (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 y-scale))) (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a x-scale) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))))
(/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (neg.f64 (*.f64 y-scale (neg.f64 y-scale))))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) y-scale))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 (*.f64 y-scale y-scale) (neg.f64 (*.f64 x-scale x-scale))))
(/.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 a (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 (*.f64 y-scale (/.f64 x-scale a)) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 (*.f64 x-scale y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 x-scale y-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 a x-scale))) (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (neg.f64 y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) (*.f64 y-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) a) (*.f64 (neg.f64 y-scale) (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 y-scale) (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (neg.f64 (/.f64 a x-scale))) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 (*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale y-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) a) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) #s(literal 1 binary64)) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (neg.f64 (/.f64 a x-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 y-scale))
(/.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (*.f64 x-scale x-scale))
(/.f64 (*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) (neg.f64 (*.f64 x-scale x-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale y-scale))) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 a (*.f64 x-scale y-scale))) (neg.f64 y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 y-scale y-scale)) (*.f64 x-scale x-scale))
(pow.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (*.f64 y-scale y-scale)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 y-scale y-scale) (/.f64 (*.f64 x-scale x-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 y-scale (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale)))) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 a (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 a (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 a (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 b (*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b b) (*.f64 #s(literal -4 binary64) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 b (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (*.f64 a b) (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 (*.f64 a (*.f64 a b)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale y-scale))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale (neg.f64 y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale x-scale)))
(*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (/.f64 b (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b)
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (*.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 y-scale y-scale)) (/.f64 a (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) x-scale) (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 b x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale x-scale)) (/.f64 b (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 b y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 a b))) (*.f64 y-scale y-scale)) (/.f64 b (*.f64 x-scale x-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) y-scale))
(*.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) (*.f64 #s(literal -4 binary64) (*.f64 a b)))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a #s(literal -4 binary64))) (*.f64 b b))
(*.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 #s(literal -4 binary64) (*.f64 a b))) b)
(*.f64 (*.f64 (*.f64 b #s(literal -4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (*.f64 a (*.f64 a b)))
(*.f64 (*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) #s(literal -4 binary64))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (pow.f64 (/.f64 y-scale (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale x-scale))))
(*.f64 (pow.f64 (/.f64 (*.f64 y-scale y-scale) (*.f64 a (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 y-scale (/.f64 x-scale a))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (/.f64 (/.f64 a x-scale) (neg.f64 y-scale)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 a (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (/.f64 a x-scale) (neg.f64 y-scale)))
(neg.f64 (/.f64 (neg.f64 (/.f64 a x-scale)) y-scale))
(/.f64 a (*.f64 x-scale y-scale))
(/.f64 (/.f64 a x-scale) y-scale)
(/.f64 (/.f64 a x-scale) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 y-scale (/.f64 x-scale a)))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale a) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) a))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 y-scale (/.f64 x-scale a)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 a) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale a))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 a) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) y-scale)
(/.f64 (/.f64 a y-scale) x-scale)
(/.f64 (*.f64 a (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (neg.f64 a) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale))
(pow.f64 (*.f64 y-scale (/.f64 x-scale a)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale a) y-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) a) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 y-scale (/.f64 x-scale a)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 (/.f64 a x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a x-scale))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (pow.f64 (/.f64 y-scale (neg.f64 a)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(exp.f64 (*.f64 (log.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 y-scale)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale y-scale))) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (neg.f64 (*.f64 x-scale y-scale))))
(neg.f64 (/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 y-scale)))
(neg.f64 (/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) y-scale))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) #s(literal 1 binary64)))
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) y-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale)))
(/.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (neg.f64 y-scale))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) (*.f64 x-scale y-scale))
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) #s(literal 1 binary64)) y-scale)
(/.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) y-scale) x-scale)
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 #s(literal 1 binary64) y-scale)) x-scale)
(/.f64 (*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 x-scale))
(pow.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) y-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale y-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) x-scale) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale) (/.f64 #s(literal 1 binary64) y-scale)))
(*.f64 a (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (*.f64 x-scale y-scale)))
(*.f64 a (/.f64 (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale) y-scale))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) y-scale))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (/.f64 a (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 b b) (*.f64 x-scale y-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (/.f64 b (*.f64 x-scale y-scale)))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale) (/.f64 a y-scale))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) y-scale))
(*.f64 (/.f64 a y-scale) (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale))
(*.f64 (/.f64 b y-scale) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) x-scale))
(*.f64 (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) y-scale) (/.f64 a x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) y-scale) (/.f64 b x-scale))
(*.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) x-scale) (/.f64 b y-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) x-scale) (/.f64 (*.f64 b b) y-scale))
(*.f64 (/.f64 (*.f64 a #s(literal -4 binary64)) y-scale) (/.f64 (*.f64 b b) x-scale))
(*.f64 (pow.f64 (/.f64 y-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (pow.f64 (/.f64 y-scale (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
#s(approx (- (* (/ (/ (* (* (* 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))) (sin (* (/ angle 180) (PI)))) (cos (* (/ angle 180) (PI)))) x-scale) y-scale)) (* (* 4 (/ (/ (+ (pow (* a (sin (* (/ angle 180) (PI)))) 2) (pow (* b (cos (* (/ angle 180) (PI)))) 2)) x-scale) x-scale)) (/ (/ (+ (pow (* a (cos (* (/ angle 180) (PI)))) 2) (pow (* b (sin (* (/ angle 180) (PI)))) 2)) y-scale) y-scale))) (/.f64 (*.f64 a (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 a b) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a b))))
(/.f64 (neg.f64 (*.f64 a (*.f64 a b))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (/.f64 (*.f64 a (*.f64 a b)) x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (*.f64 (*.f64 a b) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 (*.f64 a b) #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 b (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) y-scale)
(/.f64 (*.f64 (*.f64 a b) (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a b) (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a b) (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 (*.f64 (*.f64 a (*.f64 a b)) #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (*.f64 a (*.f64 a b)) (/.f64 #s(literal 1 binary64) x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) b) y-scale)
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 a (*.f64 a b))) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 a (*.f64 a b))) (*.f64 x-scale (*.f64 y-scale y-scale)))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) (*.f64 a (*.f64 a b))) #s(literal -1 binary64))
(*.f64 a (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b))
(*.f64 a (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 a (*.f64 (*.f64 a b) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 a (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a x-scale) (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a b) y-scale))
(*.f64 b (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b)
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a b))
(*.f64 (*.f64 a b) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (*.f64 a (*.f64 a b)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a (*.f64 a b)))
(*.f64 (/.f64 a (*.f64 x-scale x-scale)) (/.f64 (*.f64 a b) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a b) x-scale))
(*.f64 (/.f64 (*.f64 a b) x-scale) (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 b x-scale) (/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 (*.f64 a a) x-scale))
(*.f64 (/.f64 b (*.f64 x-scale x-scale)) (/.f64 (*.f64 a a) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 b (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 (*.f64 a a) y-scale))
(*.f64 (/.f64 (*.f64 a b) (*.f64 x-scale x-scale)) (/.f64 a (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a b) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 a y-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale x-scale)) (/.f64 #s(literal 1 binary64) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 (*.f64 a (*.f64 a b)) (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 b (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) a)
(*.f64 (*.f64 (*.f64 a b) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) b) (*.f64 a a))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (*.f64 a b)) a)
(exp.f64 (fma.f64 #s(literal 2 binary64) (log.f64 a) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 (*.f64 a a) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 a (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 a a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 #s(literal 1 binary64) (/.f64 y-scale (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))))
(/.f64 (*.f64 a (neg.f64 a)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale)
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (*.f64 #s(literal 1 binary64) a) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 (neg.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 (*.f64 (/.f64 a x-scale) a) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (/.f64 a x-scale)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 a (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) (neg.f64 y-scale))
(/.f64 (*.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) a) (neg.f64 y-scale))
(pow.f64 (/.f64 y-scale (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))) #s(literal -1 binary64))
(*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (*.f64 (/.f64 #s(literal 1 binary64) y-scale) a))
(*.f64 (*.f64 a a) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (*.f64 a (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) y-scale))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a))) #s(literal -1 binary64)))
(exp.f64 (+.f64 (log.f64 a) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64))))
(exp.f64 (fma.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64) (log.f64 a)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))) (/.f64 a (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 y-scale)) (/.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale)))) (/.f64 (/.f64 a x-scale) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale)))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))) (/.f64 (/.f64 a x-scale) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale)))))
(neg.f64 (/.f64 a (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(neg.f64 (/.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 y-scale)))
(neg.f64 (/.f64 (neg.f64 a) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(neg.f64 (/.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) y-scale))
(/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (/.f64 a x-scale) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) y-scale)
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (neg.f64 (neg.f64 y-scale)))
(/.f64 #s(literal 1 binary64) (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)))
(/.f64 #s(literal 1 binary64) (*.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))) y-scale))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 a x-scale)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)) #s(literal 1 binary64)))
(/.f64 (/.f64 a (*.f64 x-scale y-scale)) (*.f64 x-scale y-scale))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (neg.f64 (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (neg.f64 (/.f64 a x-scale)) (*.f64 y-scale (neg.f64 (*.f64 x-scale y-scale))))
(/.f64 (neg.f64 a) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (neg.f64 y-scale))
(/.f64 (/.f64 #s(literal 1 binary64) y-scale) (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))))
(/.f64 (/.f64 a (*.f64 x-scale x-scale)) (*.f64 y-scale y-scale))
(/.f64 (*.f64 a #s(literal 1 binary64)) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))
(/.f64 (*.f64 (/.f64 a x-scale) #s(literal 1 binary64)) (*.f64 x-scale (*.f64 y-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) #s(literal 1 binary64)) (*.f64 (neg.f64 (*.f64 x-scale y-scale)) y-scale))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale x-scale)) #s(literal 1 binary64)) (*.f64 y-scale y-scale))
(/.f64 (neg.f64 (neg.f64 a)) (neg.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(/.f64 (/.f64 a (*.f64 x-scale (*.f64 y-scale y-scale))) x-scale)
(/.f64 (*.f64 a #s(literal -1 binary64)) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) #s(literal 1 binary64)) y-scale)
(/.f64 (*.f64 a (/.f64 #s(literal 1 binary64) y-scale)) (*.f64 x-scale (*.f64 x-scale y-scale)))
(/.f64 (*.f64 (neg.f64 (/.f64 a x-scale)) (/.f64 #s(literal 1 binary64) y-scale)) (neg.f64 (*.f64 x-scale y-scale)))
(/.f64 (/.f64 (/.f64 a x-scale) (*.f64 y-scale y-scale)) x-scale)
(pow.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)) #s(literal -1 binary64))
(pow.f64 (*.f64 (*.f64 x-scale (*.f64 y-scale (/.f64 x-scale a))) y-scale) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 a x-scale)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a x-scale) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 y-scale y-scale)))
(*.f64 (/.f64 a x-scale) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)) y-scale))
(*.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))) (/.f64 #s(literal 1 binary64) y-scale))
(*.f64 #s(literal 1 binary64) (/.f64 a (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) a)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) (pow.f64 (/.f64 #s(literal 1 binary64) a) #s(literal -1 binary64)))
(*.f64 (/.f64 a (*.f64 x-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale y-scale)))
(*.f64 (neg.f64 a) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))))))
(*.f64 (neg.f64 (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale)))) (/.f64 #s(literal 1 binary64) (neg.f64 y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) a) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) y-scale) (/.f64 a (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)) (pow.f64 (/.f64 (*.f64 y-scale y-scale) a) #s(literal -1 binary64)))
(*.f64 (*.f64 a #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(*.f64 (/.f64 a (*.f64 y-scale y-scale)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale x-scale)))
(*.f64 (/.f64 a y-scale) (/.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 x-scale y-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 y-scale y-scale))) (/.f64 a x-scale))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))) (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 y-scale a) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale y-scale))))
(*.f64 (pow.f64 (/.f64 y-scale (neg.f64 (/.f64 a x-scale))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 (*.f64 x-scale y-scale))))
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 y-scale) #s(literal 2 binary64) (*.f64 (log.f64 x-scale) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (log.f64 x-scale) #s(literal 2 binary64) (*.f64 (log.f64 y-scale) #s(literal 2 binary64))))
(exp.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(pow.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1 binary64))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) #s(literal 1 binary64)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) x-scale)
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 x-scale #s(literal 1 binary64)))
(*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64)))
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 y-scale #s(literal 1 binary64)))
(*.f64 x-scale (*.f64 y-scale y-scale))
(*.f64 y-scale (*.f64 x-scale y-scale))
(*.f64 (*.f64 x-scale y-scale) y-scale)
(*.f64 (*.f64 y-scale y-scale) x-scale)
(exp.f64 (*.f64 (log.f64 (*.f64 x-scale y-scale)) #s(literal 2 binary64)))
(exp.f64 (fma.f64 (log.f64 y-scale) #s(literal 2 binary64) (*.f64 (log.f64 x-scale) #s(literal 2 binary64))))
(exp.f64 (fma.f64 (log.f64 x-scale) #s(literal 2 binary64) (*.f64 (log.f64 y-scale) #s(literal 2 binary64))))
(exp.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 x-scale y-scale))) #s(literal -1 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))))
(/.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64))
(/.f64 (neg.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1 binary64))
(pow.f64 (*.f64 x-scale y-scale) #s(literal 2 binary64))
(pow.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))) #s(literal -1 binary64))
(*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale)))
(*.f64 x-scale (/.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) #s(literal 1 binary64)))
(*.f64 y-scale (*.f64 x-scale (*.f64 x-scale y-scale)))
(*.f64 (*.f64 x-scale y-scale) (*.f64 x-scale y-scale))
(*.f64 (*.f64 y-scale y-scale) (*.f64 x-scale x-scale))
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) x-scale)
(*.f64 (*.f64 x-scale (*.f64 y-scale y-scale)) (/.f64 x-scale #s(literal 1 binary64)))
(*.f64 (*.f64 x-scale (*.f64 x-scale (*.f64 y-scale y-scale))) #s(literal 1 binary64))
(*.f64 (*.f64 x-scale x-scale) (*.f64 y-scale y-scale))
(*.f64 (*.f64 x-scale x-scale) (/.f64 (*.f64 y-scale y-scale) #s(literal 1 binary64)))
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) y-scale)
(*.f64 (*.f64 x-scale (*.f64 x-scale y-scale)) (/.f64 y-scale #s(literal 1 binary64)))
(*.f64 a (*.f64 b (*.f64 b #s(literal -4 binary64))))
(*.f64 b (*.f64 #s(literal -4 binary64) (*.f64 a b)))
(*.f64 (*.f64 b b) (*.f64 a #s(literal -4 binary64)))
(*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))
(*.f64 #s(literal -4 binary64) (*.f64 a (*.f64 b b)))
(*.f64 (*.f64 b #s(literal -4 binary64)) (*.f64 a b))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) a)
(*.f64 (*.f64 a b) (*.f64 b #s(literal -4 binary64)))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 b b))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) b)
(*.f64 (*.f64 a (*.f64 b b)) #s(literal -4 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (neg.f64 x-scale)) (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)))
(neg.f64 (neg.f64 (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)))
(/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale)
(/.f64 #s(literal 1 binary64) (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))))
(/.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (neg.f64 x-scale))
(/.f64 (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) #s(literal 1 binary64)) x-scale)
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))) (neg.f64 (neg.f64 x-scale)))
(pow.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 x-scale (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 a (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale))
(*.f64 b (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) x-scale))
(*.f64 b (*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) (/.f64 a x-scale))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) (/.f64 #s(literal 1 binary64) x-scale))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)) x-scale))
(*.f64 (*.f64 a #s(literal -4 binary64)) (/.f64 (*.f64 b b) x-scale))
(*.f64 (*.f64 a #s(literal -4 binary64)) (*.f64 (*.f64 b b) (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (/.f64 b x-scale))
(*.f64 (*.f64 #s(literal -4 binary64) (*.f64 a b)) (*.f64 b (/.f64 #s(literal 1 binary64) x-scale)))
(*.f64 (neg.f64 (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) (/.f64 #s(literal 1 binary64) (neg.f64 x-scale)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a)))
(*.f64 (/.f64 #s(literal 1 binary64) x-scale) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal -4 binary64) (*.f64 (*.f64 b b) a))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 b (*.f64 b #s(literal -4 binary64))) x-scale) a)

eval421.0ms (0.3%)

Memory
14.7MiB live, 1 148.3MiB allocated
Compiler

Compiled 69 594 to 2 014 computations (97.1% saved)

prune1.6min (62.7%)

Memory
-0.2MiB live, 172 097.7MiB allocated

end0.0ms (0%)

Memory
0.0MiB live, 0.0MiB allocated

Profiling

Loading profile data...